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I. INTRODUCTION 


A. BACKGROUND 

This thesis presents the initial research findings for a proposed wholesale level Depot 
Level Repairable (DLR) inventory model and is the start of a continuing research effort 
directed by Professor Thomas P. Moore of the Naval Postgraduate School. More spe- 
cifically, the proposed model is for low attrition DLRs. For this study, a low attrition 
DLR 1s one that is lost, stolen, or beyond economical repair less than one percent of the 
time. The accuracy of the proposed model for various levels of attrition has yet to be 
determined, but, as the reader will see in Chapter III, the proposed model seems best 
suited to the low attrition case. Also, this thesis focuses on DLRs managed by the Navy 
Ships Parts Control Center (SPCC) in Mechanicsburg, PA. 

The low attrition DLR model was proposed by Professor Moore in a paper pre- 
sented at the CORS TIMS ORSA Joint National Meeting in May 1989. The model uses 
optimization, queueing theory, and the Wilson-Harris Economic Order Quantity (EOQ) 
formula to determine the population of owned material (installed and spares), when to 
buy (attrition reorder point), and how much to buy (attrition order quantity). 

The Navy presently uses independent models to determine the inventory levels for 
each echelon of supply. That is, the Navv has three levels of supply--wholesale, retail 
intermediate, and retail consumer--and at each of these levels, independent mathematical 
models are used to compute reorder points and reorder quantities. The levels of inven- 
tory are defined as follows: [Ref. 1: p. 1-13] 


e Wholesale inventory -- Material over which the inventory manager has visibility 
and control worldwide. 


e Retail Intermediate Inventory -- A level of inventory between the consumer and 
wholesale levels used to support a geographical area. 


¢ Retail Consumer Inventory -- Inventory held strictly for a specific unit or activity 
for its oWn use. 
Wholesale inventories are positioned at stock points, such as Naval Supply Centers 
(NSC), by the item manager. Item managers for Navy material are at one of two Navy 
Inventory Control Points (ICPs): Navy Ships Parts Control Center (SPCC) or Navy 


Aviation Supply Office (ASO). The wholesale inventory levels are computed based on 


worldwide demand and are set by SPCC or ASO. Material is also purchased by SPCC 
or ASO and pushed to the stock points by the ICP. 

Retail intermediate inventories are also positioned at stock points, but, in addition, 
are located on ships such as repair ships (ARs), tenders (AD or AS), and combat logis- 
tics force ships (AFS). Unlike the wholesale level, requirements at the retail intermediate 
level are based on demands experienced in a geographical area. For example, NSC 
Charleston uses the demands for material received from ships in the Charleston area to 
determine the inventory levels it carries. So, each activity holding retail intermediate 
stocks computes its own inventory levels based on geographical demand and each ac- 
tivity purchases or pulls its own retail stocks. It should be noted that for NSCs having 
both retail and wholesale stocks of the same item, the NSC doesn’t really maintain sep- 
arate retail stocks, but pulls from the wholesale level as demands occur. In this situ- 
ation, the wholesale level, in effect, provides support directly to the customer. 

Retail consumer inventories are positioned on ships, with aircraft squadrons, and 
at shore commands. These ccnsumer level inventories are designed to support the indi- 
vidual activitv’s operations for a specified period of time (i.e., 90 days for ships). This 
level of inventory is often called on board repair parts or storeroom items. 

By the year 2005, the Navy plans to eliminate the independent inventory models and 
implement a multi-echelon optimization model for repair parts used in weapon systems 
[Ref. 2: p. 7]. The multi-echelon inventory model will use weapon system operational 
availability (4,) as the primary measure of effectiveness (MOE), where A, is defined as 
the probability that a weapon system is capable of being placed into operation upon 
demand for a specified mission [Ref. 2: p. 2]. 

The implementation of the multi-echelon inventory model will be done in three 
phases. Part of the first phase is the study of improved inventory models [Ref. 2: p. 5]. 
Hopefully, this thesis will eventually lead to an improved DLR inventory model. 

Unul the implementation of a system wide, multi-echelon model in 2005, independ- 
ent inventory models will be used at each of the three levels of supply with Supply Ma- 
terial Availability (SMA) being the primary, interim MOE used to judge the performance 
of the supply system [Ref. 2: p. D-9]. However, it should be noted that Mean Supply 
Response Time (MSRT) is being used as a MOE for some inventory systems and that 
MSRT will, in the author’s opinion, eventually replace SMA as the primary MOE. 

As previously stated, the proposed model is for the wholesale inventory level and 
will initially use SMA as the MOE. Since the current wholesale DLR inventory model 
uses SMA as the MOE, the proposed model’s MOE should be SMA so that the 


performance of the two models is measured and judged on the same standard, Future 
studies could, however, measure the performance of both models using MSRT, 4A, , or 
any other MOE. 


B. OBJECTIVES 
The objectives of this study are: 


e To provide a clear description of the current SPCC DLR levels computation model 
and the proposed levels computation model. 


e To determine if the data for the random variables in the proposed model are 
available in the SPCC Weapons System File (WSF) and Uniform Inventory Con- 
trol Program (LICP) data bases. 


¢ To collect available data from the WSF and UICP data bases for 4 small sample 
of DLRs. 


e For data not available in the WSF or LICP data bases, examine ways to collect the 
data and recommend data collection procedures. 


¢ To assist in the future study of the proposed inventory model by programming the 
current SPCC DLR inventory model using FORTRAN level 77. 


e Evaluate the validity of the proposed model's assumptions. 


C. LIMITATIONS 
The limitations of this study are: 


e This thesis is restricted to basic research; therefore, the study only addresses data 
collection possibilities and developing an emulation of the current levels setting 
program. Professor Moore's ultimate goal is to compare the proposed model's 
performance against the performance of the current model. To reach this per- 
formance comparison goal, further research and programming will be required. 


e Actual data is only collected for 12 items. Determining if the data required for the 
proposed model is readily available and. if not readily available, finding ways to 
collect it are the primary objectives of this thesis. A larger sample was not neces- 
sary to meet these objectives and would have hampered the effort. Future studies 
will. of course, have to expand the number of items examined. 


e <Any implemented inventory model must contain a budget constraint somewhere in 
the process. However, because of the limited number of items in the sample, the 
formulation of a budget constraint is not considered in this thesis. As future stu- 
dies expand the number of items examined, a budget constraint must be added to 
the proposed model. 


e SPCC’s forecasts are used as input variables for both models. To get a valid com- 
parison of the current and proposed models, the proposed model should use 
SPCC’s forecasts. If different forecasts were developed for the proposed model, 
attributing the proposed model's success or failure to the model alone would be 
impossible since the forecasts could strongly influence the model’s success or 
failure. 


D. METHODOLOGY 

Figure 1 provides an overview for the entire study as envisioned by the author and 
Professor Moore. Referring to Figure 1, this thesis only covers collecting the data and 
forecasts from SPCC, collecting repair rates and repair channel information from the 
Designated Overhaul Points (DOPs), collecting failure rate data from various sources, 
and programming the current SPCC levels setting model. 

Programming the proposed levels setting model, collecting Transaction History File 
(THF) data, developing a THF data filtering program, preparing a simulation, and 
evaluating the simulation results will require further work by Professor Moore and se- 
veral thesis students. 

As Figure | shows, SPCC data and forecasts will be used as input to an emulation 
program that replicates part of the SPCC levels program. The SPCC levels program uses 
individual observations, such as demand, to generate forecasts and then computes the 
procurement quantity, procurement reorder level, repair quantity, and repair level. The 
emulation program developed in this thesis.uses the forecasts generated by SPCC’s levels 
program as input and generates the procurement and repair levels. 

The emulation program was developed to increase the understanding of the current 
levels model, to show the quantities generated in the intermediate steps of the SPCC 
model if needed for future analysis, and to provide flexibility in answering “what if” 
questions in future studies. It should be noted that actual results from SPCC’s levels 
program should alwavs be collected to ensure that the emulation program 1s producing 
accurate results. 

Figure | also shows that input to the proposed levels setting program consists of 
data from the DOPs, failure rate data, and SPCC data. The levels setting program then 
calculates a total ownership quantity and generates a procurement reorder level quantity 
and a procurement quantity. The proposed model assumes that either the repair quan- 
tity is one and repairs are done as DLRs fail, or that repairs are accomplished when the 
number of failed DLRs reaches a set level (i.e., batch inductions to the repair process). 

Referring to Figure 1 again, SPCC’s Transaction History File (THF) contains two 
years of inventory transaction data for each DLR. This transaction data for each DLR 
will be processed by a transaction filtering program. This filtering program will eliminate 
unnecessary transactions and retain records for transactions such as demands, surveys, 
carcass returns, repair inductions, and repair completions. In addition, the transaction 
filtering program can be used to identify DLRs that haven't had any repair inductions 


in the past two years. 
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Figure 1. Overview for the Entire Study. 


The outputs from the current levels setting program, the proposed levels setting 
model program, and the transaction filtering program will then be used as inputs to a 
simulation program. The simulation program will use asset and requirements informa- 
tion from the LICP files to establish an initial inventory position. The output from the 
transaction filtering program will then be processed chronologically so that the inventory 
position is adjusted with each transaction processed through the simulation. For each 
inventory model, the simulation will track the inventory position, number of orders, 
number of stock outs, costs, etc. The simulation will then calculate SMA,! budget, and 
other pertinent measures of effectiveness. 

Finally, the MOEs generated by the simulation will be evaluated to determine if the 
proposed model is significantly more effective than the current model. 

As stated earlier, this thesis is only the start of a long effort to accomplish the entire 
study as presented in Figure | and described in the preceding paragraphs. 

For this thesis, WSF and LICP data and forecasts were collected primarily from 
SPCC’s Repairables Support Department (code 0351) and SPCC’s Systems Services Di- 
vision (code 042). Additionally, interviews were conducted with people from commercial 
and Navy repair depots, other SPCC codes, the Navy Fleet Material Support Office 
(F MSO) and the Naval Warfare Assessment Center, Corona, CA to gather data for the 


proposed model and evaluate the validity of the proposed model’s assumptions. 


E. THESIS ORGANIZATION 

Chapter I] describes the current SPCC DLR levels setting model and Chapter II] 
describes the proposed low attrition DLR levels setting model. These chapters provide 
the reader with an understanding of the theories behind the models and the assumptions 
upon which the models are based. 

Chapter IV describes the data collection methods, difficulties in selecting the sample 
National Stock Numbers (NSNs), difficulties in collecting data for the current SPCC 
model, and difficulties in collecting data for the proposed model. The chapter also 
identifies the variables requiring data collection, data collection sources, and data col- 
lection assumptions. 

Chapter V provides a brief analvsis of the proposed model’s assumptions and 


Chapter VI summarizes the major issues and offers recommendations for future study. 


1 As already noted, NIOE’s such as MSRT or A, could be substituted for SMA. The final 
MOEs will be determined in future studies. 


Il. CURRENT SPCC LEVELS SETTING MODEL 


A. BACKGROUND 
SPCC operates, and the Navy Fleet Material Support Office (FMSO) maintains, 


numerous computer programs and files to support the wholesale inventory system. 
These computer programs and files are collectively called the Uniform Inventory Control 
Program (LICP). UICP programs can be generally classified as data gathering pro- 
grams Or requirements determination programs. This chapter deals with one of the 
UICP requirements determination programs: Cyclic Levels and Forecasting (FMSO 
program DO}). 

The Cyclic Levels and Forecasting Program, commonly called Levels, performs the 
following functions: [Ref. 1: p. 3-27] 


¢ Produces forecasts, using simple exponential smoothing, for variables such as de- 
mand, carcass returns, lead times, repair turnaround times, and repair survival 
rates. These new forecast values are added to the LICP files. 


¢ Changes the mark code of the item if the demand forecast or unit cost has changed 
significantly. Everv wholesale inventory item is assigned a mark code based on the 
item’s forecasted quarterly demand and unit cost. There are five mark codes that 
range from 0 to IV. Items having a mark code of 0 are slow movers, while items 
having mark codes of I or II] are medium movers or medium demand items, and 
items having mark codes of II] or IV are fast movers or high demand items. [Ref. 
]: p. 3-10] Classifying items into mark code categories is important because the 
LICP levels program uses the mark code to determine the lead time demand dis- 
tribution that will be used for levels computation. Table ] shows a cross reference 
between mark codes and lead time demand distributions used in the levels program. 
The Value of Quarterly Demand (WQD) listed in Table 1 is simply the quarterly 
demand multiplied by the item’s unit cost. The current break point between low 
VQD and high VQD is $175.00. The quarterly demand break points are 0.25 or less 
for low demand, between 0.25 and 5 for medium demand, and 5 or above for high 
demand. [{Ref. 3] 


e Assigns and changes shipper and receiver designations. Shipper activities are those 
that don't have enough demand to warrant maintaining wholesale level operating 
stocks or don't have the capacity to handle the items. Receivers are those activities 
that have enough demand to justify stocking an item and have the capacity to do 
SO. 


* Computes the wholesale level order quantity, reorder point, repair quantity, repair 
level, receiver reorder points, and receiver safety stocks. 


Table 1. CROSS REFERENCE BETWEEN MARK CODES AND DISTRIB- 
UTIONS USED IN THE UICP LEVELS PROGRAM 


Distribution Used For Levels Computa- 
tion 


Mark Mark Code Meaning Consumables Repairables 
Code 
Low Quarterly Demand Poisson Negative 
Binomial 


Medium Quarterly De- Negative Negative 
mand and Low Value of Binomial Binomial 
Quarterly Demand (VQD) 


High Quarterly Demand Normal Normal 
and Low VOD 

Medium Quarterly De- Negative Negative 
mand and High VQD Binomial Binomial 
High Quarterly Demand Normal Normal 
and High VQD 


This thesis deals strictly with part of the last levels function described in the pre- 





ceding paragraph: computing the wholesale level order quantity, reorder point, repair 
quantity, and repair level. This study doesn’t address receiver reorder points, receiver 


safety stocks, or other levels functions. 


B. LEVELS MODEL ASSUMPTIONS 

The development of the LICP formulas for inventory levels follows the approach 
used by Hadley and Whitin in Chapter 4 of Reference 4. The assumptions are: 
[Ref. 1: p. 3-A-I]} 


e A continuous review system is in place. The current SPCC model assumes inven- 
tory requirements and assets are known at all times. 


e A steady state environment exists. That is, the model assumes that the average 
values and variances for demand, procurement lead time, production lead time, re- 
pair times, repair survival rates, and carcass return rate are constant over the fore- 
cast period. 


® Customer demands and carcass returns occur one unit per transaction. Combined 
with the continuous review assumption, this means a procurement or repair order 
is placed as soon as assets reach the reorder or repair level. 


e There are no quantity discounts. That is, the procurement or repair cost is inde- 
pendent of the order or repair quantity. 


¢ The backorder or shortage cost can be quantified. SPCC assigns an implied shor- 
tage cost to each group of DLRs having the same four-digit cognizance symbol. 
The implied shortage costs change as the budget dollars change. The use of the 
implied shortage cost to keep levels within budget is discussed near the end of the 
next section on SPCC model theory. 


e The reorder level and repair, level are always greater than or equal to Zero. 
e The inventory holding cost is a percentage of the item’s unit cost. 


¢ No interaction exists among families of items or individual non-family items. A 
family is a group of two or more items that have an interchangeable or substitute 
relationship (Ref. 1: p. 3-53]. Simply stated. inventory levels are calculated inde- 
pendently for each item, but levels combines the demand, frequency, carcass re- 
turns, and other observations of all family items to compute one forecast for the 
family head or most preferred item [Ref. 5: p. 3-1]. 


¢ The optimal inventory levels are determined by minimizing the average annual 
variable costs. The annual variable costs consist of ordering, holding. and shortage 
costs. It should be noted that the LICP levels are not necessarily optimal because 
SPCC uses approximations in computing the levels and then places constraints on 
the computed levels. 


e The relative military worth or essentiality of an item can be quantified on a relative 
scale from 0 to 1. That 1s, an item’s worth is based on the impact of the item’s 
failure on mission accomplishment. If an item’s failure would cause the loss of a 
major mission capability, that item’s essentialitv would be set high (1.e.. close to 
one); Whereas, if an item's failure would have no impact on mission capability, that 
item's essentiality would be set low (i.e., close to 0). Even though the current levels 
program can accommodate essentiality as a variable, essentiality is assigned a 
constant value of 0.5 for all SPCC managed items (1.e., DLRs and consumables) 
[Ref. 6]. 


e There are no funding limitations. This assumption is very unrealistic. As discussed 
with the shortage cost assumption, budgets do effect levels. 


e Probability distributions of lead time demand are normal or negative binomial. 
As seen in Table 1. the Poisson distribution isn’t used to compute repairable levels. 


C, “SPCC WIODEL THEORY 
1. Introduction 
The current SPCC DLR inventory model uses the quarterly forecasts generated 
in the first part of the levels program to compute the following for each DLR: 
e Procurement quantity (How much to buy?) 
e Procurement reorder level or point (When to buy?) 
e Repair quantity (How much to repair?). 


e Repair level (When to repair?). 


Before 1984, SPCC used two separate models: one for procurement quantity and 


level, as well as one for repair quantity and level [Ref. 7]. However, the independent 


models may have been causing a carcass constrained situation. That is, the procurement 
levels did not provide enough carcasses to meet the computed repair inventory levels 
[Ref. 1: p. 3-A-13]. 

In retrospect, the shortage of carcasses was more likely caused by the fleet’s 
failure to return carcasses for repair [Ref. 3]. Before the procurement of DLRs migrated 
from Appropriation Purchases Account (APA) to Navy Stock Account (NSA) funding 
in the early 1980s, the average ship had little incentive to return failed units since it 
didn’t pay for them. 

Regardless of the reasons, SPCC implemented an integrated DLR model in 1984 
[Ref. 7]. The integration of the two models was accomplished by using one stockout risk 
equation and an average acquisition time horizon for the reorder and rejiair level com- 
putations [Ref. 1: p. 3-A-13]. The following sections explain the steps taken in com- 
puting levels using this integrated DLR model. 

2. Total Variable Cost Equation 

As stated in the assumptions, this model minimizes total annual variable costs 
(TVC). The TVC equation used to develop the levels formulas for the integrated re- 
pairables model is: [Ref. 8: p. 5] 


TVC = Ordering Costs + Holding Costs + Shortage Costs 


4(D — G) AG 
— ———_——_ | _—_— 
ome LO) 4,| 


+|1e($) +10 S) + 1c(R- D+ GL- r+ 2) | 


This TVC equation really just integrates the procurement problem TVC equation and 
the repair problem TVC equation of the previous version of the repairables model. The 
costs that compose this integrated TVC equation are defined as follows: 
[Ref. 1: p. 3-A-11] 


4(D —G) 4G 


¢ Ordering cosC =" — Ai 
Z Q Q, “7 
where: 
4(D-G) 
— o. = Expected number of procurement orders in a vear; 


10 


D-G 


Attrition demand forecast; 


D = Quarterly demand forecast; 

G = Quarterly regenerations forecast; 

Q = Attrition (procurement) order quantity; 

A = Administrative ordering cost + manufacturer’s setup cost; 
4G/Q, = Expected number of repair batches in a year; 

Q; = Repair quantity; 

A, = Repair ordering cost + repair setup cost. 


A regeneration forecast is the quantity of an item that we expect will be repaired 
and returned to the wholesale inventory during the quarter. Since deman} (})) repres- 
ents the number coming out of stock and regenerations (G) represents the number being 
put back into stock from repair, attrition demand (D— G) is the net number of an item 


being removed from stock during the quarter that must be replenished through pro- 


curement. 
¢ Holding cost = 1C(Q/2) + IC, (Q,/2) + ICR - DL + GL—GT+ B,); 
SUAere: 
] = Inventory holding cost rate (Fixed at .21 for DLRs); 
C = Jtem procurement unit cost; 
c = Item repair unit cost; 
e ~ |S Geese ier 


Jtem’s weighted average unit cost; 


R-—DL+GL-—GT = The expected safety stock; 


R = Inventory position reorder point or level; 

ibs = Procurement lead time; 

DL = Expected demand during procurement lead time, 

Gis = Expected regenerations during procurement lead time; 

T = Repair cycle time = time to repair + time between scheduled repairs; 
eng = Expected regenerations during the repair cycle time; 

B, = Expected number of units on backorder at any random point in time. 


A backorder occurs when a material request from a customer can’t be imme- 


diately satisfied, so the material request is suspended until stock is received 


li 


[Ref. 1: p. A-3]. The UICP program approximates B, by using expected number of 


units backordered in an order cycle. That is: 


B, -| (X — R)F(X;L,)dx; 
R 
where: 
X = A random variable representing demand during resupply lead time; 


L,; = Resupply lead time. 


B, is an approximation that prevents difficulties in taking derivatives. Also note that, in 
reality, X is a discrete random variable. A continuous function is used as an approxi- 
mation to simplify computations. Also, the resupply lead time is the average time to 
resupply the stock of a DLR, and can be expressed as the sum of the average time for 


repair and the average time to procure new assets. That is: 


L-2T+ (1-2 J. 


The reasoning behind the holding cost equation is easier to comprehend if the 
equation is broken down into parts. To get a holding cost in dollars, the equation must 
contain a dollars’unit element and a quantity or number of units element. IC, IC,, and 
IC, represent the dollars unit elements, while Q/2, Q,/2, and R-DL+GL—GT+B, 
represent the average or expected number of RFI and NRFI units on hand during the 
year. Applying three different holding cost rates clouds the inventory position (IP) the- 
ory on which the holding cost is based. The following paragraphs explain the use of 
inventory position in the holding cost portion of the TVC equation. 

Note that the expression for safety stock, R-— DL + GL — GT, can be expressed 


as: 
2 =((D— GEG 


Also, inventory position (IP) is defined as the on hand (OH) plus on order (OO) minus 
backorders (BO) [Ref. 9: p. 94]. That is: 


IP = OH + OO — BO. 


Therefore, the expected on hand or E(OH{) is: 


E(OH) = E(IP) — E(OO) + E(BO); 
= Q/2 + Q,/2+ R—-[(D — G)L+ GT] + B,. 
Breaking down the equation for E(OH): 
EQIP) = Q/2+Q,/2+R; 
E(OO) = (D — G)L + GT; 
E(BO) = B,. 


The E(1P) term represents an average RFI inventory position. The E(OO) term 
may not make sense at first glance, but if the regenerations (G) were zero, E(OO) = 
DL or demand during lead time. So, the E(OO) term can be thought of as the lead time 
demand for a DLR [Ref. 4: p. 187]. SPCC refers to the E(OO) term as the procurement 
problem variable (Z) [Ref. 1: p. 3-A-8]. Mathematically then: 


EeO) =7=(D-—G)L+GT. 
E(OO), or Z, can be derived as follows: [Ref. 3] 


Let: 


CRR = Carcass return rate. This is the expected percentage of quarterly demands for 
which the fleet will return a carcass. 


RSR = Repair survival rate. This is the expected percentage of carcasses received at 
the DOP that will be repairable (1.e., survive the repair process at the DOP) and be 
returned to RFI condition. 


With these two terms defined, regenerations can be expressed as: 
G=CRRx RSR x D. 


Note that if the fleet turns in all carcasses for each DLR tssued from stock, CRR = I. 
If all of these turned-in carcasses survive the repair process, RSR = 1 and G = D. That 
1S, attrition is zero. 

Using algebra, the percentage of regenerated assets can be expressed as: 
G 


Dp =~CRR x RSR, 


and it follows that | - G’D is the percentage of attrition. Recalling that Z can be 
thought of as the lead time demand for a DLR: 


Z=D-x Resupply Lead Time = D x L; 


Or 


z=dx| G1+(1-S 


or 
Z=GI+DL-—GTI. 


Although it may also seem strange that the backorder term is included in the 
holding cost equation, B, must be included when defining the expected number of units 


on hand in terms of inventory position. 


¢ Shortage Cost = es Be 


D 
where: 
= Shortage cost per requisition backordered; 
E = Item military essentiality (currently 0.5 for all items); 
F = Quarterly requisition frequency forecast (1.e., requisitions per quarter). 


SPCC assigns a unique / to each four-digit cognizance symbol group. That 1s, 
all items having the same four-digit cognizance symbol have the same /. 


To summarize: 


AD G . 


C= 
Q Q» 


4) (1) 


O 
+ 1c( 5) +10 S)+1eyr- pe + GL-or+ 8) 


3. Deriving the Procurement Order Quantity (Q) 


Taking the partial derivative of TVC with respect to the procurement order 


quantity, Q: 


éQ. Or 2 
Be (eC + 
Setting Fo. 0 and solving for the economic order quantity (Q): 
8({D — G)A 
oe - 


Note that this formulation of Q is not really optimal because the correct form of the 
shortage cost, which should have been used by the ICPs in Equation (1), is also a func- 
tion of Q. An optimal solution would involve the inclusion of this shortage cost term 
in Equation (2) and would require using an iterative approach to solve for Q. 
4. Deriving the Procurement Reorder Level (R) 
The reorder level is calculated using the stockout risk and either the normal or 
negative binomial distribution. The formula for the integrated stockout risk is derived 


by taking the partial derivative of TVC with respect to the reorder level, R, as follows: 


NG EEE 


eR 





=1C, +10; Sa i ee _ R)F(X;L,)dx; 
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=1C,+| 1G+ ae | (X — RYFUV:L,)dx. 


Using Leibnitz’ rule: 
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Setting = 0 and solving for the stockout risk: [Ref. 1: p. 3-A-13] 


DIC, 


io — i F(X.L3)dx = iG, fuer ; 


After this integrated Risk equation is calculated, it is further constrained by the 
ICPs. [Ref. 1: p. 3-A-16] Ifthe calculated risk is below an ICP minimum risk value, risk 
is set equal to the minimum risk value. If the calculated risk is above an ICP maximum 


risk value, risk is set equal to the maximum risk value. These minimum and maximum 


risk values are set to the same values for each item in a four-digit cognizance symbol 
(COG) group. 

After the constrained risk value is derived, the procurement problem variable (Z) 
is calculated as discussed on page 14. Z is then compared to what SPCC calls a Proba- 
bility Break Point (PBP) value to decide which distribution (i.e., normal or negative 
binomial) to use in calculating the attrition reorder level. SPCC assigns unique PBPs to 
each four-digit COG so that every DLR having the same four-digit COG has the same 
PBP. SPCC currently sets PBP = 0 for 87 of the 104 four-digit COGs for DLRs. In 
general, faster moving items have PBP = 0 so that the normal distribution is used to 
calculate the reorder level. If Z = PBP, the basic reorder point (R) is computed as: 
{Ref. 10: p. M-1] 


R=Z+2z0; (3) 
“lene; 

Z = Procurement probleim variable; - 

z = The appropriate normal deviate; 

o = Procurement problem standard deviation; 

zo = Safety stock. 


The formula for o is a function of the same variables that determine the procurement 
problem variable (Z) [Ref. 1: p. 3-A-43]. 
If Z < PBP, the negative binomial distribution is used to compute the reorder 


level (R). In that case, R is the smallest value such that: [Ref. 10: p. M-3] 


BR) etic (4) 


The negative binomial density function is: [Ref. 11: p. 122] 
fas (as 7 pf =p. fo hee 


where both x and k are integer values. However, the ICPs use the following recursion 
formula to approximate the negative binomial distribution, which ignores the require- 
ment that k be an integer: [Ref. 3] 


pox = x) = {SAR ba pyeex = x= 


where: 


2) =); 
a? = Procurement problem variance; 
we 
k = al : 
3. Deriving the Repair Quantity ( Q, ). 


Taking the partial derivative of TVC with respect to the repair quantity, Q, : 


IC 


eTVC _ ~4G 
2 2 


= A,+ 
CQ, : 


Setting ¢7VC/¢CQ, =0 and solving for Q,: 


o,- [842 
ary IC, ° 





However, SPCC constrains G so that G< D and uses the following formula for the re- 
pair quantity: (Ref. 8: p. 5] 


S min(D.G).45 


2 = iG, 


6. Deriving the Repair Level ( R, ) 
Recall that under the integrated model, only one risk equation is used. That is, 
a neW risk equation is not derived for computing R,. Instead, SPCC computes R, as 
follows: [Ref. 1: p. 3-A-14] 


R,=DT+R-Z,; 


where: 
DT = Demand during repair problem turnaround time; 
R—Z _ = Safety stock from the procurement part of the problem. 


To understand the reasoning behind this formulation for R,, assume that a 
normal distribution was used to calculate the reorder level (R) for a particular DLR. 


Substituting equation (3) on page 16 for R, R, can be expressed as: 


R, = DT +20. 


Recall that the integrated stockout risk equation 1s used to find the z value and 
that Zo represents the safetv stock. Thus, under the integrated model, R and R, have a 
common safety stock. So, R; simply consists of a quantity of stock available for issue 
while carcasses are being repaired (DT) and a safety stock quantity (R — Z or za) to 
provide protection against stockouts caused by variations in demand or repair turn- 
around time. 

7. Summary 

The theory behind the current SPCC integrated DLR model is to minimize 
TVC. In reality, however, SPCC actually tries to maximize supply material availability 
(SMA) subject to a budget constraint. The use of the implied shortage cost (/) is the 
key to understanding what is really happening. 


Recall that the risk equation 1s: 


DIC, 


Rh Geen 


An increase in 4 means that the risk decreases. If risk decreases, the safety stock (thus 
reorder level (R)) increases and SMA will improve. This makes sense since the higher 
the stockout cost, the more a stockout should be avoided. However, 4 can only be in- 
creased if funds are available to purchase the increased safety stock. 

As an example, assume an item’s reorder level is computed using the normal 
distribution and that initially, risk = 0.50, the procurement problem variable (Z) = 10, 
and the procurement problem variance (o?) = 4. Using the risk value and the normal 


distribution, the normal deviate (z) = 0. Thus, using equation (3) on page 16: 
R=Z+20; 
= 10+ 0(2)=10 units. 


If the shortage cost (A) were increased such that risk = 0.3085, the normal deviate (z) 
will now be 0.5 and: 


R= 104 0.5(2) = 11 units. 


Thus, increasing the shortage cost, in this example, caused an increase in the safety stock 
of one unit. 

To summarize, SPCC uses the following equations to compute levels for each 
DLR: 
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e Procurement Order Quantity (Q) 


/ &D—G)A 


a aan Ta 
DIC, 
eS Hic LIE 


¢ Procurement Reorder Level (R) 
Using the normal distribution: 
R=Z+2e. 
Using the negative binomial distribution: 


R = the smallest value such that: 


R 
TS P(X = x) >1-— Risk. 


i=0 
¢ Repair Quantity ( Q, ) 
oe 8 niin{ D,G)A, 
a ic 
e Repair Level (R,) 
i= DT + R—Z, 


D. SPCC DLR MODEL CONSTRAINTS 
Once the values of Q, R. Q,, and R, are calculated for all items from the formulas 
just discussed, constraints are applied to these values to get the final levels for each item. 
1. Constrained Procurement Order Quantity ( O VE 
[Ref. 8: pp. 0-23, O-46] 
If D<G then: 


= 
Ifa Life Of Type (LOT) quanuty exists, then: 
a) = LOT quantity. 


The LOT quantity of an item is the quantity required to sustain operations of a weapon 
system or end item throughout its life [Ref. 1: p. A-9]. 
Ford SG: 


12(D — G) 
min ne Hee rm “| 
A QO 


Q=min 


4S(D — G) — max 18 5 2 


where: 
12(D— G) = Twelve quarters or three years of attrition demand; 
K,(D-— G) = Minimum buy quantity in terms of attrition demand; 
iS, = Discount quantity. Usually K,=0, but if zero, the levels program sets 
LG Sle 
Q = Order quantity computed in equation (2) on page 15; 
S = Shelf life in quarters; 
R = Constrained procurement reorder level. To be discussed in the next 


section. 


Although discount quantity is the term used by FMSO for K, [Ref. 5: p. O-23], this ter- 
minology is misleading since K,(D — G) really represents the minimum buy quantity in 
terms of quarters of attrition demand. 

2. Constrained Procurement Reorder Level ( R Ve 
[Ref. 5: p. O-44] 


Ifa LOT quantity exists then: 
R20. 


[eZ = Oiihen: 


A 


R = Max (NSO, 0). 


Otherwise: 
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4DS+Z- K,(D — G) 


where: 

i, = Reorder level constraint rate. Assigned by four-digit COG, SPCC sets K, 
equal to one or zero. Currently, K, = 1 for 87 of 104 four-digit COGs 
for WIEKs. For those DERs wheresky— 1, R is forced to be at least as big 
as Z. 

NSO = Numeric stocking objective. A value to ensure a minimum stocking level. 

kK, = Maximum number of quarters of safety stock acceptable. K, = 20 for all 
items [Ref. 7]. 

R = Basic procurement reorder level computed using equation (3) or (4) on 


page 16. 
NRPR = Number of policy receivers. The number of stock points that, by policy, 
will stock this wholesale inventory item. 
3. Constrained Repair Quantity ( O, ir 
[Ref. 10: p. K-11] 
If SPCC is the Secondary Inventory Control Activity (SICA), then OQ, =0. 
When SPCC has Aviation Supply Office (ASO) managed material installed in an SPCC 
managed equipment, SPCC is the SICA for the ASO managed item. That is, ASO has 
primary responsibility for the item, which includes scheduling the repair of all carcasses. 
Thus, SPCC’s repair quanuty (O,) iS set tO Zero. 
hia — Ooms — 0 onl) l =O then: 


Otherwise: 


/s)\ 


Q, 
A AD R-Z 
EES || By es 0 : 
LOT — DT — max . x 4 
where: 
Q, = Basic repair quantity; 
LOT = Life of type quantity. 


4. Constrained Repair Level ( R, ). 
[Ref. 10: p. K-11] 


If SPCC is the SICA then: 
R => 0. 


If D=0 or GsO0 or DT =0 then: 


A 


R, = max (DT + 0.5, 0). 
Otherwise: 


0 

NSO 

ADS aie =| 
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E. LEVELS PROGRAM 


Appendix A contains a FORTRAN 77 program that performs the computations 
discussed in this chapter. 


Ill. PROPOSED LOW ATTRITION DLR MODEL 


A. BACKGROUND 

As seen in Chapter II, the current SPCC DLR model has separate equations for 
procurement levels (O and R) and repair levels (0, and R,). Even though the risk 
equation is common to the reorder level (R) and repair level (R;), two separate levels still 
eXist. 

The proposed model, like the current model, computes a reorder level for each DLR. 
However, if batch inductions are not used, a repair level computation isn’t necessary in 
the proposed model because each item is inducted for repair immediately after failure. 
If batch inductions are used, the repair level equals the repair quantity and is very simple 
to compute. This process is described later in this chapter. 

The simplicity of the immediate induction or batch induction process used in the 
proposed model is an advantage that can be clearly understood if the reader is familiar 
with the complex induction process currently used. The following paragraphs provide 
a brief and incomplete description of the current repair requirements determination 
process, but gives the reader an appreciation of its complexity. 

SPCC’s Workload Forecast (WLF) program identifies 88 percent of SPCC’s repair 
requirements and the Repair Scheduling, or BO8, program identifies the remaining 12 
percent of SPCC’s repair requirements [Ref. 12: pp. I-2]. 

The WLF program is run every six months and is pro-active in that it tries to predict 
the ready for issue (RFI) inventory position for the next six months to determine the 
repair inductions that will be required. The required inductions are referred to as repair 
requirements [Ref. 12: p. 1]. The repair requirements output from the WLF program 
are the primary tool used by SPCC personnel at the semi-annual repair conferences. 
These repair conferences are discussed in greater detail in Chapter IV, but basically, 
these conferences are used to communicate SPCC’s repair requirements for the next six 
months to the DOPs and to get each DOP’s commitment to a repair schedule. The 
DOPs can induct all carcasses received up to the repair requirement quantity, but SPCC 
advises each DOP to do its workload planning based on the production quantity. The 
production quantity is the repair requirement constrained by the carcass returns and 
represents SPCC’s best estimate of the actual carcass receipts at the DOP for the next 


six months [Ref. 12: p. 1]. 


The other source used to identify repair requirements, the Repair Scheduling or B08 
program, is run biweekly. SPCC uses this program to identify sporadic repair require- 
ments and views the program as a safety net to catch emergent requirements that 
couldn’t be forecasted [Ref. 12: p. 2]. Repair requirements identified by the BO8 pro- 
gram are reviewed by the responsible item manager. For those items where an immedi- 
ate need exists, SPCC attempts to get the required number of carcasses into the repair 
process immediately. For less critical requirements, SPCC will schedule needed repairs 
during the next semiannual repair conference [Ref. 13]. 

Both WLF and B08 compare assets with requirements to see if a repair induction is 
required. WLF, however, is pro-active, while B08 is reactive. That is, WLF predicts the 
repair requirements for the next six months, while BO8 uses past data to calculate the 
current repair requirement. 

Although the previous paragraphs provide only a brief description of the process 
SPCC uses to determine repair requirements, one can see that the process is complex, 
requires a large staff of people at SPCC to make it work, and isn’t exact due to the na- 
ture of forecasting. 

As Stated earlier, the proposed model greatly simplifies the repair induction process. 
The model assumes that the repair quantity is one and repairs are done as anv DLR fails 
(ies Q, = 1), or that repairs are accomplished when the number of failed DLRs reaches 
a set level! (1e8 Q,= batch induction quantity). So, management must decide whether 
or not batch induction is desired and, if desired, the batch induction quantity for each 
item must be determined. The major drawback would be the initial repair budget re- 
quired to repair the existing backlogs of not ready for issue (NRFI) carcasses. 

The proposed model is similar to the current DLR model in that both compute a 
reorder level and an attrition order quantity, but the proposed model uses queueing 
theory to integrate the repair process into the inventory model. The proposed model 
also depends on total asset visibilitv. Total asset visibility means that the on hand assets 
at all levels--wholesale, retail intermediate, and retail consumer--are known along with 
the total installed population and the number of NRFI units at repair facilities and stock 
points. While total asset visibility is not readily available at present, this information 
can be estimated. More exact asset visibility procedures are being developed as part of 
the Navy's Secondary Item Weapon System Management (SIWSM) initiative 
[Ref. 2: pp. 5 and D-1]. As information improves, so will the performance of the 


proposed model. 
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Past work on models similar to the proposed model has been done by Gross, Miller, 
and Soland [Ref. 14], Gross [Ref 15], Graves [Ref. 16], Moinzadeh and Lee [Ref. 17], and 
Sherbrooke [Ref. 18]. All of the past work, however, assumes that no attrition exists. 
That is, all carcasses entering repair are returned to RFI condition. The proposed model 
doesn’t make this assumption. 

Graves’ article, “A Multi-Echelon Inventory Model for a Repairable Item with 
One-For-One Replenishment,” describes an inventory process using a closed queueing 
system with a finite number of servers. He refers to this model as the exact model. He 
then compares the exact model to a model that uses a negative binomial distribution and 
a model called METRIC that uses a queueing system that assumes an infinite number 
of servers [Ref. 16: pp. 1248-1251]. Although Graves implies that when there are actu- 
ally a finite number of servers at a repair facility, the best model is the exact model, the 
negative binomial and METRIC approximations are far less complex and are currently 
being used. For the 1968 test cases used, Graves found the negative binomial approxi- 
mation resulted in stockage quantities different from the exact model only 0.9 percent 
of the time and that the METRIC stockage quantities differed from the exact model 11.5 
mercemt of the time (Ref. 16: p. 1253]. 

Sherbrooke’s, “Vari: METRIC: Improved Approximations for Multi-Indenture, 
Multi-Echelon Availability Models,” article presents a model that improves on the ear- 
lier METRIC model and show's that as an approximation to the exact model presented 
by Graves, Vari- METRIC improves on METRIC and provides results almost equal to 
the negative binomial model presented by Graves [Ref. 18: p. 311]. 

In his article, “On the Ample Service Assumption of Palm’s Theorem in Inventory 
Modeling.” Gross contends that for most repairable item inventory control processes, 
the assumption that items to be repaired never queue up, but go into repair immediately, 
is false. [Ref. 15: pp. 1065-1067] Gross then shows that incorrectly assuming unlimited 
repair capacity will cause measures of effectiveness, such as fill rate, to have overly op- 
timistic values. 

In “A Closed Queueing Model for Multi-echelon Repairables Item Provisioning,” 
Gross. Miller, and Soland presented a closed queueing network theory to model the 
stochastic inventory process. [Ref. 14: p. 344] They studied how to determine the opti- 
mal spares levels and repair capacities for a repairable item, multi-echelon system in 
which a finite number of operational items are desired at any given time and in which 


queueing may occur at the repair facilities when all repair channels are busy. 


In “Batch Size and Stockage Levels in Multi-Echelon Repairable Systems,” Moin- 
zadeh and Lee contend that for multi-echelon repairable inventory systems with high 
ordering costs or high demand rates or both, the use of a batch ordering policy may be 
more cost effective than the common one-for-one ordering policy [Ref. 17: p. 1579]. The 
case presented by Moinzadeh and Lee is evidence that batch repair in the proposed 
model presented in this thesis may also be cost effective where high repair set up costs 
or high demand rates or both are in evidence. 

To summarize, the articles by Graves and Sherbrooke promote using approxi- 
mations to what they refer to as an exact model. This exact model uses a queueing 
model with a finite number of servers. The queueing theory used for Graves’ and 
Sherbrooke’s exact model is identical to the queueing theory used in the proposed model 
presented here. The approximations use queueing models that assume an infinite num- 
ber of servers or repair channels and have the advantage of computational simplicity. 

Gross points out that when the ample server (i.e., infinite number of servers) as- 
sumption doesn’t hold, the approximate models’ anticipated inventory effectiveness can 
be significantly overstated. Gross, Miller, and Soland present an inventorv control 
process using a queueing model having a finite number of servers. 

Finally, Moinzadeh and Lee present a case for using a batch ordering policy that 
can be extended to using a batch repair induction policy when cost efficient. 

The proposed model presented in this chapter takes an approach similar to Gross, 
Miller, and Soland. After discussions with repair depot personnel, it is clear that the fi- 


nite server case certainly applies to the repair facilities used by the Navy. 


B. MODEL ASSUMPTIONS 
The following assumptions apply to the proposed model: [Ref: 19] 
e A continuous review control process exists. 


e A single echelon of inventory exists. In this case, the model deals with the whole- 
sale inventory level. 


¢ One or more stock keeping units or National Stock Numbers (NSN) of DLRs are 
stocked. 


¢ The inventory managers are concerned about costs and about operational avail- 
ability of the equipment into which the DLRs are installed. 


e Repair facilities, inventories of spare DLRs, and repairable equipment are located 
in the same general area so that transportation costs and times are negligible. 


e Failed DLRs can be repaired most, but not all of the time. That is, the DLRs 
suffer low attrition. 


e AMM 14K Kk or M M’c KK queueing model is appropriate for the repair proc- 
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ess. This means that failures, and thus arrivals for repair, follow a poisson process 
(.e., interarrival times are exponentially distributed). Service times are exponen- 
tially distributed. The system capacity is limited to K units and there are K units 
in the population source that feeds the repair facilities. 


The item manager (1M) at the ICP has total asset visibility. That is, the IM has 
access to information that tells him or her the number of installed units, wholesale 
Ready For Issue (RFI) units, retail intermediate RFI units, retail consumer RFI 
units, and NRFI units. 


The IM has visibility of other variables such as number of repair channels, failure 
rates, and service times. 


NRFI DLRs enter the repair process as soon as they are removed and sent to the 
repair depot. This is a radical change in philosophy. Under this model, there is 
no need to calculate a repair quantity or repair level since a unit enters the repair 
process as soon as it fails. As already noted, the model can be adapted to use batch 
inductions to the repair process. 


A Steady state situation exists. 


PROPOSED MODEL THEORY 
The proposed model assumes eithera M.M 1K K or M'M.c’K, K queueing system 


for the repair process. The theory behind these models is described in this section. 


1. Kendall Notation 
MMIK K and M Meck K represent a shorthand notation developed by 


David Kendall for describing queueing models having specific characteristics. The fol- 


lowing is a breakdown of the shorthand notation used in this thesis: [Ref. 20: p. 157] 


M -- When used in the first position of Kendall’s notation, Mf means that the pro- 
cess assumes an exponential distribution for interarrival times. 


M -- When used in the second position of Kendall's notation, M means that the 
process assumes an exponential distribution for service times. 


c -- When used in the third position of Kendall’s notation, c refers to the number 
of servers or repair channels. 


K -- When used in the fourth position of Kendall’s notation, K defines the system 
capacity or maximum number of customers allowed in the system. A customer in 
this case is a failed DLR. 


K -- When used in the fifth position of Kendall’s notation, K defines the number 
of customers in the source population. In this case, there is a finite number of each 
DLR that could possibly be repaired. This quantity, K, is the number of each DLR 
that the Navy owns. 


2. Queueing Model Notation 


The following notation is used in the queueing systems used in this model: 


(em 20; pr 352] 
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Cc = Number of identical repair channels; 

Hu = Average repair rate per repair channel; 

O = Average failure rate of an individual DLR; 

XS = Random variable describing the steady state number of NRFI units; 
P, = Steady state probability that there are n NRFI units; 

I/u = Expected repair time; 

L/o. = Expected interfailure time or Mean Time Between Failures (MTBF). 


3. The M/NI/1/K/K Queueing System 
This system is often called the machine repair queueing system with cne repair- 
man. The following description refers to the diagram of this system shown in Figure 2. 
[Ref. 20: pp. 187-190] 
The population of potential customers consists of K identical machines or 


DLRs. DLR’s have an operating me between failure which is exponentially distributed 


with a MTBF = 4 The one server repairs the DLRs at a rate ( pw ) that is exponen- 
tially distributed with a Mean Time To Repair (MTTR) = _ Referring to Figure 3, 


the queueing system is inside the box formed by the dashed lines; therefore, the operat- 
ing machines or DLRs are outside the system and enter only when they fail. This model 
always reaches steady state because there can be no more than K (the number we own) 
DLRs in the system. Steady state means that the influences of the initial or start up 
conditions have smoothed out and the probability that a certain number of DLRs are 
in the system and in the queue is independent of time. When the queueing system 1s first 
put into operation, and for some time afterwards, the number in the queue and in service 
depends strongly on both the initial conditions (such as the number of customers queued 
up waiting for the svstem to begin operation) and how long the system has been oper- 
ating [Ref. 20: p. 152]. 

When N machines or DLRs have failed, K— N are operating or are RFI. The 
time until the next DLR fails is the minimum of K — N identical exponential distrib- 
utions; thus, the time until the next DLR fails is exponentially distributed with parame- 
ter (K — .\)o and the probability, P,, that n DLRs have failed (n being the number of 


units in the queueing system) is: 
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Figure 2. Machine Repair Queueing System With One Repairman (M/M/1/K/K) 
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and 


Py = The probability that zero units are in the queueing system. 


4. The M/M/c/K/K Queueing System 
This system is exactly like the M’M/1/K/K system except that there are c re- 
pairmen rather than one and c < K. A diagram of this system is shown in Figure 3 
[Ref. 20: p. 191]. Here, the probability that there are n DLRs in the queueing system 
is: [Ref. 20: pp. 190-192] 


29 


Operating time 


Wo 


Number of machines doven 





Figure 3. Machine Repair Queueing System With c Repairmen (M/M/c/K/K) 
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D. PROPOSED DLR MODEL 
The proposed model consists of three steps: {Ref. 19] 
1. Compute the target, minimum population size (K)). 


2. Compute the reorder point (R,). 


Loe) 


. Compute the reorder quantity (Q,). 


The subscript 1 used with each of the variables in the proposed madel identifies an indi- 
vidual DLR in the set of n possible different DLRs being considered in the inventory 
control process (i.e., i = 1,2,...,n). 

The target minimum population size (K,) is a level of inventory that consists of in- 
stalled units, RFI spares, and NRFI spares for DLR i. The spares in K, can be thought 
of as safety stock. As the reader will see in subsequent sections, K, is calculated using 
a machine repair queueing model. This machine repair queucing model assumes that 
there is no attrition in the short term and that the repair facility has a finite number of 
servers or repair channels. Stated simply, the queueing model is used to find the mini- 
mum stockage level (A_.) for each DLR i such that the probability of having more broken 
units than spares is less than a specified maximum shortage probability. 

The reorder point (R,) for each DLR i, represents a quantity of stock, to be owned 
over and above the A, population quantity, that equals the expected mean attrition de- 
mand during procurement lead time plus or minus some additional safety stock. A ne- 
gative safety stock implies that the DLR has very low demand or is not critical or both. 
In these cases, the item may not be stocked above the K, level (1.e., R, = 0) and the A, 
level may not contain any spares. Thus, if an installed unit failed, a replacement would 
not be available until the failed unit was repaired or a new unit procured. 

R, is determined by using the Poisson distribution and finding the smallest value 
such that the probability of actual attrition demand during lead time being greater than 
the reorder level quantity (R,) is less that a specific stockout risk. When the inventory 
position of DLR i reaches R, an attrition buy of Q, units is initiated. 

Initially, each DLR must have an inventory position (IP) of installed units, RFI 
spares, NRFI spares (including spares undergoing repair), and on order spares equal to: 
[Ref. 19] 


Max IP, = k; sP R; + Q,. 
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As attrition occurs, the inventory position is graduallv reduced to a quantity equal to 
K,+ R, When this happens, an attrition buy of Q, units is made. Notice that, unlike the 
current SPCC DLR model, inventory position does not include backorders. [Ref. 21] 
While the current model's inventory position only includes spares (i.e., IP = RFI spares 
on hand + spares on order - spares on backorder), the proposed model's inventory po- 
sition includes RFI spares (on hand and on order), NRFI spares on hand, and installed 
units. Thus, backorders must be included in the inventory position of the current model 
so that demand continues to reduce the inventory position, and orders continue to be 
placed, after the quantity of on hand RFI spares is reduced to zero. This is not the case 
for the proposed model. If the on hand inventory (RFI spares and installed) in the in- 
ventory position for the proposed model ever reaches zero, not only are there no spares 
on hand, but there are also no installed units. If there are no installed units, then there 
will be no further failures and tracking backorders as part of inventory position isn't 
necessary. 

The proposed model assumes that when an installed DLR fails and is replaced, the 
failed unit, or carcass, is inducted for repair immediately (i.e., don’t use batch repair). 
In this case only the attrition inventory position is tracked for each DLR since the repair 
quantity is always one. 

If, however, batch inductions were used, the number of failed units not already in 
the repair process would also have to be tracked. These non-inducted carcasses repre- 
sent a second inventory position or carcass inventory position that must be tracked for 
each DLR. The carcass inventory position for each DLR starts at zero, but is increased 
as units of DLR i fail. When the number of carcasses of a specific DLR reaches or ex- 
ceeds an induction level of Q,, units, all carcasses are inducted for repair and the carcass 
inventory position is reduced to zero. 

The computations of the K, R,, and Q, values are described in the following sections. 

1. Step One--Compute The Target Minimum Population Size ( A; ) 

Here the minimum K, is computed for each DLR such that the probability of 
an Out Of Commission (OOC) equipment is less than a management specified percent- 
age. The term OOC, as used here, means that the number of broken units of DLR 1 1s 
greater than the number of spares available. Thus, there is no replacement for at least 
one failed DLR installed in a system. Mathematically, this can be expressed as: 
[Ref 39| 
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Minimize ) K;, 
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Subject To: P(N; > K;-U) < b, RG eae — ner 


where: 
n = The number of different items for which levels computations are needed; 
K, = Decision variable representing all installed units and a safety stock of RFI 
and NRFI units of DLR 3; 
N, = The number of failed units of DLR i; 
UL == The number of installed units of DLR 3; 
b, = The acceptable percentage of time the number of failed units exceeds the 


number of spares for DLR i. This is a management decision variable, 
but 1s treated as a svstem parameter in the model formulation. 
Note that for future studies using a large number of items, a budget constraint must be 
added to this formulation. Otherwise, the decision makers who manage the supply sys- 


tem might be inclined to set b, = 0 for alli. Notice also that: 


P(N;> K;- U) = 1- PUN SK - U) 
K,-U, 

aoe >, P(N; =n) 
Tt) 


The calculation of P(.V,=7) depends on the number of repairmen used at a particular 
repair depot. With one repairman. the M M 1 K K system formulas presented on pages 
31 and 32 are used to compute P, or P(.\, =n). With c repairmen, the M Mc KK 
system formulas presented on pages 31 and 32 a re used to compute P, or PUN, =x). 

Optimal K can be found using linear programming or marginal analysis. This 
thesis only presents the model. The optimization procedure for K, must be developed in 
a future study. 

2. Step Two--Compute The Incremental Reorder Point Quantity ( R; ) 

Here, &, is minimized such that the probability of attrition lead time demand 
being greater than the reorder point quantity is less than a maximum attrition shortage 
probability. The Poisson probability distribution with mean (D,— G,) is assumed. Stated 


mathematically: [Ref. 19] 
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Minimize R,, 


Subject To: P(X; > R;) < by, Ong le ne 


where: 
R, = Decision variable representing the incremental attrition reorder point quantity 
for item i; 
X, = Random variable representing the attrition lead time demand for item 1; 
b, = Maximum attrition shortage probability or risk. This is a management 
decision variable, but is treated as a system parameter in the model 
formulation. 


Expressing this another way, for each DLR, R, is the smallest value such that: 


R, 
Y Pao = te 


x, =0 
where: 
PN — 0) ee eee 
D—-G 
Pee eee 1) for Ae elec ees, 


Note that P(X, = 0) and P(X, = x,) represent a recursion formula for the Poisson 
distribution. 
3. Step Three--Compute The Reorder Quantity ( Q, ) 
The model uses the basic Wilson-Harris EOQ formula developed in the last 
chapter for O7miiner 19) 


O a SAAD; = G;) 
rN 1G, 


where: 
A, = Admunistrative ordering cost for item 1; 
D, = Quarterly demand forecast for item 1; 
G, = Quarterly regenerations forecast for item i; 
I = Annual holding cost rate (set at 0.21 for DLRs); 


, = Unit cost of item i. 
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IV. DATA COLLECTION 
A. INTRODUCTION 


This chapter addresses the main objective of this thesis; namely, to determine if the 
data required for the proposed model are available and collectable. 

The chapter begins by identifving the variables, constants, and comparison data re- 
quired for the current and proposed models. Sample size determination and National 
Stock Number (NSN) selection are then discussed, followed by a review of the initial 
data collection difficulties and how these data collection problems were handled. 

The last two sections of the chapter discuss and present the sample data collected 
for the current SPCC levels model and the proposed model. 

Although there were difficulties in collecting the data required for the proposed 
model, the author was able to find sources for the required data for all but one NSN in 
the sample. This doesn’t mean that there are no remaining data collection problems. 
As the reader progresses through this chapter, it becomes apparent that for a large data 


sample, many problems remain for future study. 


B. VARIABLES. CONSTANTS, AND COMPARISON DATA REQUIRED 
1. Data Requirements for the UICP Emulation Program 
Data required for the LICP levels emulation program in Appendix A were 
broken into four categories. 
e Svstem constants -- Those input elements that are constant for all NSNs. 


e Four digit cognizance symbol (COG) constants -- Those input elements that are 
constant for all NSNs having the same four-digit COG. 


¢ Unique input variables -- Those input elements that vary for each NSN. 


¢ Comparison data -- Those data elements used to compare the emulation program 
results with actual SPCC results. 


This section briefly describes the required constants, variables, and comparison data for 
each of the four categories above. 


a. System Constants 
e Annual holding cost rate. 
e \faximum number of quarters of safety stock. 


e Military essentiality code (MEC). 


a 


Administrative cost to repair one item. 


Repair review cycle time -- A constant that can be used to constrain the repair 
quantity. 


Administrative cost to place one procurement order. 


b. Four Digit Cognizance Symbol Constants 


The following constants are the same for all depot level repairables (DLRs) having the 


same four-digit COG. 


Probability break point -- A constant that, when compared to the procurement 
problem variable (Z), determines the probability distribution that is used to com- 
pute the reorder level. 


Maximum allowable stockout risk. 
Minimum allowable stockout risk. 
Shortage cost. 


Reorder level constraint value -- A constant used by the LICP program to con- 
strain the reorder level. 


ce. Unique Input Variables 


To support the emulation program in Appendix A, data were required for 


the following variables: 


Number of policy receivers -- The number of stock points that will carry wholesale 
inventory for a particular DLR. 


Requisition frequency average -- The forecasted number of requisitions processed 
per quarter. 


Procurement problem variance -- The variance in attrition demand during resupply 
ume. 


System reorder level low limit quantity -- Also called the numeric stocking objec- 
tive, this variable represents the munimum quantity of stock desired. 


Gross system demand during procurement lead time. 


Gross system demand at the end of lead time -- This is equivalent to the quarterly 
demand forecast. 


System ready for issue (RFI) regenerations during procurement lead time. 


System RFI regenerations at the end of lead time -- This is equivalent to the 
quarterly regenerations forecast. 


Gross system demand during repair turnaround time (RTAT). 
Unit procurement cost. 
Unit repair cost. 


Manufacturer’s setup cost. 
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Repair setup cost. 


Discount quantity -- This is not a quantity for which a price break is received, but 
a variable used to control the minimum buy quantity in the levels program. 


Lilevol tpe quantity -- The quantity of material required to sustain operations 
throughout the life of an equipment or end item. 


Four digit cognizance symbol (COG). 
Shelf life code. 
Level of authority code for the Secondary Inventory Control Activity (SICA). 


Nonconsumable item material support code -- Used in conjunction with the level 
of authority code to define SPCC’s responsibility for a DLR. 


Acquisition advice code -- A code used by the Levels program to decide if the DLR 
will be purchased for stock. 


Wear out rate -- A forecast for the percentage of a particular DLR which will be- 
come unserviceable [Ref. 5: p. 3-19] 


d. Comparison Data 


The following data elements should be collected for each DLR so that the 


results of the emulation program can be verified. 


Procurement reorder quantity. 

Procurement reorder level quantity. 

Repair quantity. 

Repair level quantity. 

2. Data Requirements for the Proposed Model 


The following variables must be collected for all DLRs in support of the pro- 


posed model. Some of the variables, such as quarterly demand forecast, are common to 


the current LICP levels model and the proposed model. [Ref. 19] 


The number of repair channels or stations at each repair facility. 
The average failure rate for each DLR (when available). 


The best replacement factor (BRF) -- An estimate of the number of part replace- 
ments per vear for a given equipment or part population [Ref. 22: p. 1]. For this 
thesis, BRI is considered for use as an estimate of the average failure rate when the 
failure rate data is not available. 


The average repair rate per repair channel. 
Administrative cost of placing a procurement order. 
Quarterly demand forecast for each DLR. 


Quarterly regenerations forecast for each DLR. 
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e Annual holding cost rate. 
e Procurement unit cost of each DLR. 


¢ The number of installed units of each DLR -- This variable is not required for levels 
computation, but will be required to compare the proposed model’s effectiveness 
against the effectiveness of the current UICP model. 


e The repair turnaround time (RTAT) for each DLR -- Also not required for levels 
computations, this variable can be used to ensure that the average repair rates from 
the DOPs are reasonable. 

Instead of recording the quarterly demand and regeneration forecast for each 
DLR and subtracting these two forecasts to get an attrition demand forecast, future 
studies should consider using actual demand and survev data from SPCC’s Transaction 
History File (THF) to forecast the attrition demand. 


C. SAMPLE SIZE AND SAMPLE NSN SELECTION CRITERIA 
The first step in collecting data for the two models was to decide on a sample size 

and select the sample NSNs. After several discussions with Professor Moore, the sample 
size selected was 12 and the 12 NSNs were selected using the following criteria: 

e High Repair Survival Rate (RSR) and Carcass Return Rate (CRR). 

e¢ Some items with a high average quarterly demand, D, (1.e., D > 5). 

e Some items with a mediuin average quarterly demand (1e., .25 << D< 5). 

e Some items with a low average quarterly demand (i.e., D < .25). 


¢ Some items with a short Repair Turnaround Time (RTAT) (.e., RTAT < 1 quar- 
ter). 


e Some items with a medium RTAT (ie., 1 < RTAT < 4). 
e Some items with a long RTAT (1e., RTAT > 4). 


e Select items from a general repair shop (i.e., a depot that performs repairs on many 
NSNs) and some items from a specific repair shop (1.e., a depot that performs re- 
pairs on only a few NSNs). 

A sample of 12 depot level repairables (DLRs) was sufficient to meet the above cri- 
teria While keeping the size of the study manageable. 
The criteria requiring all sample items to have a high RSR2 and a high CRR3 was 


necessary since the proposed model is designed for DLRs having a low attrition rate. 


2 RSR is defined as the percentage of items inducted for repair that can be expected to be re- 
turned to RFI condition. [Ref. 5: p. 3-16] The RSR calculation only includes surveys at the depot 
level. 


3 CRR, as used here, is a percentage equal to (1 -WOR)/RSR. The wear out rate (WOR) 
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Finally, the criteria concerning a general repair shop versus a specialized repair shop 
was intended to identify any major differences in service times and procedures, as well 
as identify data availability differences and impact on model assumptions. 

Once the sample size and selection criteria were chosen, a Computation And Re- 
search Evaluation System (CARES) data base containing 30,884 7H COG NSNs was 
examined to get a count of the number of DLRs having a RSR greater than or equal to 
0.85, 0.90, 0.95, 0.98, and 0.99. This particular CARES data base was from the spring 
1988 run at SPCC and was provided by Professor A. W. McMasters. The results of 
these queries are presented in Table 2 and one of the selection programs used is shown 
in Appendix B. 

The CARES data base contains RSR values, but not CRR values; therefore, for this 
thesis, CRR was estimated as G D x RSR [Ref. 3], where G represents the quarterly re- 
generations forecast. DLRs having a RSR value and a CRR value greater than or equal 


to 0.99 were considered to have a low attrition rate. 


Table 2. 7H COG NSN BREAKDOWN BY RSR 


RSR => Number of 7H COG Percent of all 7H COG 
NSNs Out of 30,884 NSNs 
83.96 
19,168 
2519 









Using the 2172 candidate items having a RSR = 0.99, separate selection programs 
were used to break the candidate items into different combinations of RTAT and Quar- 
terly Demand (D). Table 3 shows the number of items in each category and a sample 


selection program is presented in Appendix C. 


is defined as the percentage of items inducted for repair that can be expected to become NRFI. 
{Ref. 5: p. 3-19] The WOR includes surveys from all maintenance levels. 
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Table 3. BREAKDOWN OF 7H COG NSNS HAVING A HIGH RSR 
Low Demand | Medium Demand | High Demand] Totals 
(D° = 0:25) (0.25<D< 5) a 
Short RTAT 116 132 
(RTAT < 1 Qtr) 
Medium RTAT 1867 
(1< RTAT <4) 
Long RTAT 15 29 
(RTAT > 4) 


Totals «dt 99 ~*~ 7 










D. INITIAL DATA COLLECTION EFFORTS AND DIFFICULTIES 

From the nine categories in Table 3, 40 NSNs were randomly selected. SPCC could 
provide all the information needed for the current LICP model, but SPCC’s Repairables 
Support Department (code 035) confirmed that data for the number of repair channels 
was not available from LICP files. That is, SPCC could not provide the data for the 
variable c in the M.M/c’K/K queueing model. Data for this variable, at a minimum, 
would have to come directly from the designated overhaul points (DOPs), i.e., the repair 
depots. 

Next, the Master Repairables Item List (MRIL) was used to identify the DOPs for 
the 40 items selected. Six NSNs and two DOPs were then selected for initial investi- 
gation. At this point, it was important to see how hard it would be to get information 
from the DOPs. Table 4 lists the six NSNs selected and their corresponding DOP from 
the VIR 

The initial contact at Naval Supply Center (NSC) Puget Sound was Mr. Bill 
Armstrong in the Supply Support Branch (code 301.4). NSC Puget Sound was actually 
not the DOP, but the Designated Support Point (DSP) for the amplifier, board assem- 
bly, and electromagnetic relay listed in Table 4. A DSP is a central receiving point for 
DLR carcasses. If no repair requirement exists when a carcass is received, the DSP 
stores the item and sends a Transaction Item Report (TIR) to SPCC reporting the re- 
ceipt of the material in failed condition (i.e., condition code F).4 For the reader’s 


4 A material condition code is a single alphabetic code that indicates the various states of 
Ready For Issue (RFI) or Not Ready For Issue (NRFI) on hand assets in the supply system 
{Ref. 1: p. A-10}. 
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reference, the condition codes most frequently used in the repair process are presented 
in Table 5 [Ref. 23: pp. A9-7 -- A9-8]. 


Table 4. MRIL SHIPPING INFORMATION FOR THE INITIAL SAMPLE 
COG, Material Control Nomenclature Designated Overhaul 
Gode(MC@).and NSN Point 
7H H 1265-00-614-9227 Amplifier Naval Supply Center, 
Puget Sound 
7H H 1210-00-785-8344 Board Assembly Naval Supply Center, 
Puget Sound 
7H H 5945-00-790-4885 Electromagnetic Relay Naval Supply Center, 
Puget Sound 
7H H 2815-00- 106-8060 ALCO Power, Auburn, 
NY 
TH H 2815-01-013-5684 Diesel Engine Block ALCO Power, Auburn, 
NY 
7H H 2815-01-025-3819 ALCO Power, Auburn, 
NY 

























Table 8. MATERIAL CONDITION CODES USED IN THE REPAIR PROCESS 


Condition Condition Code Definition 
Code 


Serviceable. New. used, repaired or reconditioned material that 1s 
serviceable and issuable to all customers without limitation or re- 
striction. 










Unserviceable (Repairable). Economically repairable material that 
requires repair or overhaul. 














Unserviceable (Incomplete). Material awaiting additional parts or 
components to complete the repair. 







Unserviceable (Condemned). Material determined to be unserviceable 


and uneconomical to repair. 


Suspended (In work). Material identified on an inventory control re- 
cord, but which has been turned over to a maintenance facility or 
contractor for repair (inducted). 





When the DOP is ready to begin a repair, the DOP sends an induction order to the DSP. 
[Ref. 24] The DSP is responsible for getting the carcass from storage and sending it to 
the DOP. The DOP may be a commercial company or may be organic to the Navy or 


4) 


other military service (i.e., a government run DOP such as a Naval shipyard). Once 
shipped, the DSP sends a TIR to SPCC reporting the item in M condition. This means 
that a failed carcass has entered the repair process (i.e., has been inducted). 

In the case of carcasses sent to NSC Puget Sound, 90 percent of them are repaired 
at Naval Shipyard (NSY) Puget Sound [Ref. 24]. 

Assuming that the three sample items were sent to NSY Puget Sound in the past, 
several calls were made leading to the Electronics Repair Shop (shop 67) and its foreman 
Mr. Marty Levar. After researching his records for these NSNs, Mr. Levar determined 
that shop 67 hadn’t worked on these items in the past two years. After numerous tele- 
phone calls and discussions with NSC Puget Sound, NSY Puget Sound, and SPCC per- 
sonnel. it was found that no repair inductions had been made in the past two years for 
the following reasons: [Ref 25] 


e The amplifier, NSN 7H H 1265-00-614-9227, had 72 units in RFI or A condition 
and 63 units in F condition. Although demand was 5.01 units per quarter, there 
were plenty of RFI units on hand to meet this projected demand, so the NRFI 
units received were being stored at NSC Puget Sound in F condition. 


e The board assembly, NSN 7H H 1210-00-785-8344, had 40 RFI units and 25 NRFI 
units on hand (all F condition). Demand was only 1.03 per quarter, so again, there 
were plenty of RFI units to meet requirements and no inductions were being or- 
dered. 


e The electromagnetic relay, NSN 7H H 5845-00-790-4885, had two RFI units and 
ten NRFI units on hand (all F condition). Demand for this NSN was only 0.02 
per quarter; therefore the NRFI units weren't being inducted. 


From this initial attempt to gather information, several lessons were learned: 


¢ NRFI DLRs are presently only inducted for repair when they are needed to re- 
plenish stock or support fleet operations. If there is sufficient RFI stock, the failed 
units are stored in F condition at the DSP until needed. An additional element was 
added to the sample selection criteria as a result of this finding: there must have 
been at least one repair induction during the past two years. 


¢ The MRIL doesn’t list the DOP in all cases. The Maintenance’Overhaul Desig- 
nator (MOD) code determines whether the MRIL shows direct shipment of car- 
casses to the DOP or to a DSP where the NRFI units are held until needed. MOD 
code | results in the actual DOP name and address appearing in the MRIL, while 
MOD code 3 causes the DSP name and address to appear in the MRIL 
{Ref. 12: p. 3]. The MOD code is Data Element Number (DENS ) BO75D in the 
CICP data base and the SPCC item managers can change the MOD code for each 
DLR as required [Ref. 5: p. U-3]. 


3 A DEN is a code used to identify the location of inventory related information in UICP files. 
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For DOPs close to a NSC, the NSC is the DSP. The DSP sends the necessary TIRs 
to SPCC and stores the material until SPCC schedules a repair induction and the DOP 
inducts the item. 

For DOPs not close to a NSC, such as Naval Weapons Support Center (NWSC) 
Crane, IN, the DOP Supply Department acts as the DSP, sending TIRs to SPCC and 
storing the carcasses until needed. 

For this study SPCC’s Repairables Support Department (code 035) had to do a 
WSF query to identify the DOP for the items with MOD code 3. 


e The research on the three items having NSC Puget Sound as the DSP in the MRIL 
provided a clear picture of the flow of information and material in the organic re- 
pair process. This information and material flow is illustrated in Figure 4 
[Ref. 26: p. 16]. In Figure 4, the numbers in parentheses represent the sequence 
of events in the repair cycle. 


e Repair turnaround time (RTAT), as collected and maintained by SPCC, is not a 
good estimate of the mean repair service rate. The mean repair service rate, as 
discussed in Chapter II]. ts required in the first computational step of the proposed 
model and includes only the time an item actually spends on the bench being re- 
paired. RTAT, on tne other hand, has four different time segments: 
(Ref. 26: p. 36] 


= DOP material receipt -- The time from when the DSP ships the carcass and 
sends the M condition TIR until the carcass is received at the DOP. 


* DOP induction -- The time from DOP receipt of carcasses until the repair start 
date. Although Rodwell (see Ref. 26) states in his thesis that the TIR changing 
the material condition code from F to M should be sent when the actual repair 
begins. the M condition TIR is being sent when the DSP ships the material to 
the DOP [Ref. 24]. 


*« DOP repair in process -- The time it takes to repair the NRFI material. 


= RFI receipt time -- The time from completion of the repair until the item is re- 
ported in A condition via TIR. This includes time spent in preservation and 
packing after the repair is complete, transportation time to the DSP, storage 
processing time at the DSP, and TIR preparation time at the DSP. 

As described above, RTAT includes many different segments of time other than re- 
pair time; therefore, RTAT can’t be used as an estimate of the average repair rate van- 
able in the proposed model. The unsuitability of RTAT is discussed in more detail later 
in this chapter. 

Referring back to Table 4, the MRIL listed ALCO Power Company as the DOP for 
the two diesel engines and the diesel engine block. ALCO Power was, in fact, the DOP. 
After several calls, Mr. Steve Farrow of ALCO’s contracts department was asked to 


provide: 
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Figure 4. Organic Repair Process for DLRs 


The number of repair stations or channels used to repair each of the three DLRs. 


The average service time or the actual service times for repairs over the past two 
vears. 


ALCO Power was unable or unwilling to provide any information on the three items, 


but several things were learned: 


Commercial DOPs often work with part numbers and can’t identify an item by its 
NSN. ALCO was provided the NSN, part number, and description of the three 
items. 


Commercial DOPs that compete for repair business may be unwilling to provide 
actual service times to Navy personnel for fear that the information will be used 
against them in contract negotiations. In the author’s opinion, this was the case 
with ALCO Power. 


Some commercial DOPs don’t have information systems set up to easily record and 
retrieve actual service times. ALCO Power could easily provide standard labor 
hours and rates used to charge the Navy for work, but not actual service man- 
hours. 


A better method was needed to penetrate commercial DOP organizations to get the 
information needed for this study. 


E. RESOLUTION OF DIFFICULTIES AND FINAL SAMPLE SELECTION 
Summarizing the lessons learned from the last section, three issues require further 
discussion: 


Identifving DLRs that had been inducted for repair at least once in the past two 
vears was necessary; therefore, a procedure to accomplish this was needed. 


Identifving the DOP for each of the sample DLRs was also required. A procedure 
for identifving the DOP needed to be developed. 


Establishing points of contact at SPCC who could help gather data for each of the 
sample DLRs from the DOPs was necessary. 


The solutions to these three issues are discussed in the following sections. 


1. Identifying DLRs That Are Being Repaired 
Out of the 40 NSNs initially selected, SPCC’s Repairables Support Department 


(code 03512) was given 12 items that were selected at random. SPCC did a manual re- 


view of each NSN against the Transaction History File (THF) and determined that 6 


of the 12 NSNs had no repair history for the past two years. So, to complete the sample, 


SPCC’s Repairables Support Department (code 03512) randomly selected six other 


DLRs using the selection criteria discussed in the beginning of this chapter. The sample 


of DLRs selected for this study are presented in Tables 6 and 7. 
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Table 6. SAMPLE DLRS USED IN THIS STUDY 
COG, MCC, and NSN NSN Quarterly | RTAT | RSR 
Soests Demand 
Forecast 
7H H 5840-00-004-2754 aaa 3.92 1.87 NSY Long 
Beach 
7H H 1290-00-177-9946 SPCC 3.79 4.15 Ocean Tech- 
nology, Bur- 
bank, CA 
7H H 1285-00218 2-3756 SPCC Ocean Tech- 
nology, Bur- 
bank, CA 
Bar | H 1285-00-187-6676 ~ NWSC Crane, 
beiicoanss H 5895-00-494-0145 SPCC 0. 0.3 GTE, Moun- 
tain View, CA 
7H H 6110-00-889-8110 Author 3.65 0.56 NSY Long 
Beach 


7H H 1440-01-029-1741 Author 4.29 NWS Seal 
Beach, CA 
7H H 1440- Gree 029-2581 aaa 1.0 NWS Seal 
Beach, CA 


Licata aa H 2040-01-032-9059 _ Sperry Ma- 
rine, Char- 
lottesville, VA 

7H H 2040-01-037-3691 SPEG Koll Morgen, 
ee 


7H E 6605-01-112-6484 Author 30.59 io <a 
Anaheim, CA 
and Aero- 
space Guid- 
ance and 
Meteorologi- 
cal Center 
(AGMC), Ne- 
wark A. F. 
Station, OH 
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Table 7. SAMPLE DLRS USED IN THIS STUDY oe 


COG, MCC, and NSN ASN Quarterly | RTAT 
Selected Demand 
Forecast 


7G H 3820-01-113-7212 SPCC 1.24 1.04 Naval Elec- 
tronics Sys- 
tem 
Engineering 
Center (NE- 
SEC) San 
Diego, CA 


For future studies having a large number of DLRs, a screening program must 










be developed to determine which DLRs have been actively repaired in the past two 
years. As discussed in Chapter I. an expanded study using a simulation would use THF 
data on magnetic tape or disk. The THF data must be screened by document identifier 
to identify different records as demands, surveys, and repair inductions. Repair in- 
ductions can be identified by TIRs having a Document Identifier (DI) of D4_, D6é_, 
DSC, Z3C, or Z3D and material condition code M. The DI indicates a material status 
change and the M condition code means that a repair induction has occurred. These five 


DIs are defined as follows: 


e D4 -- Receipt transaction that notifies the ICP that a stock point has received 
material from procurement, repair, or other specified source [Ref. 27: p. 2-4]. 


¢ D6_-- Receipt transaction that notifies the ICP that a stock point has received 
material from other than procurement sources. The source may be a redistribution 
order or material turned-in to store [Ref. 27: p. 2-5]. 


e DSC -- Inventory adjustment transaction that increases an activity’s on hand bal- 
ance of material having the condition code specified in position 71 of an item’s re- 
cord [Rei. 27: p. 4-3]. 


e Z3C -- A repair in process time observation from a Navy TIR reporting activity 
that is outside filter limits [Ref. 27: p. 5-92]. Transactions having this DI are used 
to correct erroneous TIR information and are input after the IM reviews and cor- 
rects the erroneous transactions on a TIR processing error list. 


e Z3D -- A repair turnaround time observation from a Navy non-TIR reporting ac- 
tivity or commercial repair activity that is outside filter limits [Ref. 27: p. 5-92]. 
Use of the Z3D DI is the same as the Z3C. 


Any NSN having a DI of D4_, D6_, D8C, Z3C, or Z3D has had repair activity 


in the past two years since the THF only contains two years of transactions [Ref. 28]. 
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Figure 5 shows a sample THF record. Each line on the THF printout in Figure 
5 represents one transaction. The information listed under the first column labeled, 
“DIC,” is the document identifier code. The second column, “4-6,” contains a routing 
identifier or identification code of the activity that submitted the TIR. Other important 
columns and their meanings are: 


e NIIN -- National item identification code. The NIIN uniquely identifies the ma- 
terial and consists of the last nine digits of the NSN. 


¢ Doc Number -- Document number. The document number consists of a six digit 
Unit Identification Code (UIC), a four-digit julian date, and a serial number. Re- 
ferring to Figure 5, the first five digits in this column are not part of the document 
number, but represent the quantity. The UIC, which identifies the activity initiat- 
ing this transaction, is represented by the next six digits. For example, “N97456,” 
is the UIC for the first transaction listed in Figure 5. The julian date and serial 
number follow the UIC. 


e C -- The column labeled with a “C” has the material condition code listed beneath 
it. 


e Tra Date -- The transaction date is listed in this column. This is the date that the 
transaction was received by SPCC. This is the starting date used in calculating 
RTAT. 

2. Identifying the DOP 
For this thesis, SPCC’s Repairables Support Department (code 03512) did a 
manual retrieval of the data from the Repairables Master File (RMF) to identify the 
DOPs listed in Tables 6 and 7. For future studies that have a large number of DLRs, 
the DENs listed in Table 8 can be retrieved and stored on magnetic tape for each DLR. 
These DENs can then be used to determine the actual DOP using a screening program 


with logic similar to that presented in Figure 6. 
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DATE 89223 BOAUHIL THF INTERROGATES 


» 
a 
n 


NIIN SMICUT ODC NUMBER sup 76-80 81-86 
ad 


001779946 EA 0000 1NS745691920058 YC2x Da AM H M3 


001779946 EA 0000 1NS97456919200S9 YC2Xx OA AM H M3 
001779946 EA GO0001NS9745691920060 YC2Xx OA aM m3 
001779946 EA 0000 1N9745691920063 YC2uU OA aM M3 
001779946 EA 0000 1N9745691920064 YC2U Oa «aM m3 
001779946 EA 0000 1N9745691920065 YC2U OA am m3 
001779946 EA 0000 1N9745691920066 YC2U Oa am m3 
001779946 Ea 000000 20 403000 
001779946 Ea 000024 20 403000 
001779946 EA GO001N974569 1920041 Oa AF 
001779946 EA GO001NS74569 1920042 OA AF 
001779946 EA O000 1N974569 1920043 OA aF 
001779946 E& GCO00 1N974569 1920044 OA aF 
001779946 EA 0000 1N974569 1920045 OA AF 
001778946 EA 0000 1N974569 1920046 OA AF 
001779946 Ea 0000 1N9745691920047 OA AF 
001779946 EA 0000 1N974569 1920048 DA AF 
001779946 EA 0000 1N97 4569 1920049 DA AF 
001779946 EA 0000 1N974569 1920050 OA AF 


001779946 EA 0000 1N97 4569 1920051 DA AF 


JGC 
JGC 
JGC 
UGC 
vGC 
JGC 
JGC 
JGC 
JGC 
JGC 
JGC 
JGC 
JGC 
JGC 
JGC 
vGc 
vGCc 
vGc 
JGCc 
vGc 
JGC 


S beco aoe fee 8 es ices 8 fakes 0S eee se 


001778946 EA 0000 1N97 4569 19 20052 OA AF 





Figure 5. Transaction History File (THF) Record 
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Table 8. DATA ELEMENT NUMBERS (DEN) TO IDENTIFY THE DOP 


DEN Name DEN Description 
F016 Designated Collection’ Overhaul Provides the UIC for organic DOPs 
Point or the CAGE for commercial DOPs. 
FOL6A DOP Availability Schedule Date | The date that the DOP will have the 
capability to repair this NSN. 


FO16D =| AvailabilityPhaseout'Collection 1 = The UIC or CAGE in DEN 
Point Indicator F016 is a collection point. 0 or2 = 
the LIC, CAGE in DEN F016 is the 
DOr: 


Provides the current repair contract 
number if there is one. The contract 
number can be useful when talking 
with commercial DOP personnel. 


F146 Deletion Indicator x = The UIC or CAGE in DEN 
F016 is no longer a DOP. 


The Commercial And Government Entity (CAGE) code uniquely identifies a commercial 




























Repair Contract Number 







activity that does business with the government. CAGE codes are found in the Navy's 
Cataloging Handbook (H4-1) microfiche. 
3. SPCC Points of Contact to Help Gather DOP Data 

SPCC’s Repairables Support Department (code 035) has an organic repair su- 
pervisor and a commercial repair supervisor in code 03533. These repair supervisors are 
responsible for haison with the IMs and liaison between SPCC and the DOPs. Part of 
their responsibilitv includes running a semiannual repair conference where DOP repre- 
sentatives: [Ref. 28] 


e Are given an SPCC estimate of the number of carcasses to expect for the next six 
months. 


e Negotiate repair quantity in relation to DOP repair capacity. 
¢ Confirm repair prices, RSR forecasts, and RTAT forecasts. 


¢ Discuss anv difficulties that need to be resolved. 


Because they have frequent contact with DOP personnel, code 03533 was able to provide 
points of contact (POCs) and telephone numbers for each DOP in the sample. In all 


cases, the POCs at the DOPs were willing to cooperate with this research. 


READ OENs 
F@16. Fe .6A 





Figure 6. Logic Used to Find the DOP 


Si 


Another valuable source of DOP information is the SPCC Repairables Man- 
agement Field Representative (RMFR). Table 9 provides the current list of SPCC 
RMFRs. These nine representatives each have an assigned territory and they make 
frequent trips to all DOPs (organic and commercial) in their territory. [Ref. 29] Since 
they make site visits, the RMFRs have POCs in the DOP who can provide detailed in- 


formation on repair processes and times. 


Table 9. TUM RN ee ee ee MANAGEMENT FIELD REPRESENTATIVES 















SPCC RMFR RMFR Location Telephone Number 
Name 


Naval Ordnance Station ) A/V 989-5838 
Louisville, KY 40214-5001 Comm: (502) 364-5838 
Attn: SPCC RMFR MDS 47 


NWSC Crane. IN. 47522-35000 A'V 482-1874 
= 





Bill Clymer 


1 
Attn: SPCC RMER Code 70 Comm: (812) 854-1874 
NSY Norfolk A’'V 961-776 
8 











Portsmouth, VA 23709-5000 Comm: (804) 396-7769 
Attn: SPCC RMER Code 205 
NESEC San Diego A, V 524-2861 

P. O. Box 80337 E Comm: (619) 524-2861 
San Diego, CA 92138-5038 

Attn: SPCC RMER Code 03 


NWSC Crane. IN. 47522-5000 A’ V 482-3759 
Attn: SPCC RMER Code 803 Comm: (812) 854-3759 
NSC San Diego 

37 \. Harbor Dr - 


Chobby Betts AlV 536-512 
937 Nok Comm: (619) 556-5125 


-5125 
San Diego, CA 92132-5044 
Attn: SPCC RMER Code 300 
NSC Norfolk. VA 23512-5000 A'V 565-2528 
Attn: SPCC RMIFR Code 800D Comm: (86 9-252 
Naval Undersea Warfare Engineering Sta.| A V 744-2925 
Kevport. WA_ 98345-0580 Comm: (206) 396-2925 
Attn: SPCC RMER Code 11 
A V 564-3016 
Comm: (804) 444-3016 






Bob Clement 


Stan Chastain 
























Chuck Bunting 


nola 
NSY Long Beach, CA 90822-5099 A V 360-7313 
Attn: SPCC RMER Code 224 Comm: (213) 547-7313 
NWS Seal Beach, CA _ 90740-5000 A V 873-7396 
Attn: SPCC RMFER Code 01 Comm: 213) 594-7396 


3 
Vacant NSY Mare Island A/V 253-2522 
Comm: (707) 646-2522 


Vallejo. CA 94592 
Attn: SPCC RMER Code 219 

For this study, a combination of DOP representatives and RMFRs were used 

to gather data from the DOPs. These POCs are listed in Table 10 for each DLR in the 


sample. 







Navv Electronics Maintenance Center 
1609A Diamond Springs Rd. 

Virginia Beach, VA 23455-5000 
Attn: SPCC RMER Code 340A 
















OZ 


While data from the DOPs can be collected, it took a month to gather the in- 
formation for 12 sample items. Expanding this study to more items will require an au- 
tomated or semi-automated data collection process. A suggested process is discussed 
later in this chapter. 


Table 10. DOP POINTS OF CONTACT (POC FOR SAMPLE NSNS 







Sova Telephone Number 
——EEE H 5840-00-004-2754 Chohbx poe A’V 526-5125 

Beac h 
7H H 1290-00-177-9946 Ocean Tech- . aa (213) 849-7111 (x314) 


nology, Bur- Drury 
bank.” 














7H H 1285-00- 182-3756 Ocean Tt Fae Wavne (213) 849-7111 (x314) 
nology, Bur- {| Drury 
bank. CA 
7H H 1285-00-187-6676 SSC Bill Clymer A V 482-1874 
Crane, IN ue a 
errell 
Houchins 


7H H 3595-00-494-0145 GTE, Moun- | Lou Cardar- | (415) 966-4065 
ian View, elli 


TH H 6110-00-889-8 110 ae Beus A ¥ 526-5125 
Beach 
7H H 1440-01-029-1741 NWS Seal et ate ALY 526-5125 
Beach. CA RMER) 
7H H 1440-01-029-2581 aa Seal Chobby Betts | A V 526-5125 
Beach, CA (RMER) 


TH H 2040-01-032-9059 Sperry Ma- Sam Grimsby | (804) 974-2362 
rine, Char- 
lottesville, 
VA 


7H H 3040-01-037-3691 Les, Morgen, | Tony Tall- es 4H 586-2330 
 PeLsTOny man 


s 
7H E 6605-01-112-6484 Rockwell. Chobby Betts | A V 526-5125 
SS (RMFR) 
7H E 6605-01-112-6484 KELIG Ne- {| Ned Phelps A V 346-7340 
wark Air ete 
Force Sta- LASW) 
tion, OH 
7G H 5$20-01-113-7212 Nise oan Vern Brum- A'V 524-2869 
| Diego, CA Pods 
ai) 


F. SPCC LEVELS MODEL DATA AND EMULATION PROGRAM RESULTS 


This section discusses the variables needed to calculate the reorder quantity (Q), re- 



















order level (R), repair quantity (Q,), and repair level (R,). The data collection methods 
are discussed and the output from the levels emulation program in Appendix A is com- 
pared to the actual SPCC levels program output for the 12 sample items. 
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1. Variables Required for the Current SPCC Levels Model (D01) 

The CARES data base was the initial source of variable data for this study, but 
was rejected after a careful analysis of the FMSO UICP Levels Program Functional 
Description (F MSO Document Number FD-D01). The CARES program and the LICP 
levels program use different data element numbers (DENs) for demand (D) and regen- 
erations (G). CARES uses DEN BO74 for D and BO74A for G, while levels uses BO23D 
and B023F for D and G, respectively. Although FMSO believes that these DENs con- 
tained equivalent numbers, the potential for differences seems high in a system as com- 
plex as the LICP [Ref. 30]. Table 11 shows a comparison of the values of the DENs 
used for D and G in CARES and in UICP. Although the comparison is for only 12 
NSNs, the systematic values are evidence that the DENs are not identical. 

After further investigation, the differences between B074 and BO23D, as well as 
the differences between BO74A and BO23F, were caused by the way the storage area for 
each variable is defined by FMSO. [Ref. 6] In the case of the demand values, the BO74 
storage field carries only two decimal places, while the BO23D storage field carries eight 
decimal places. In the regeneration case, BO74A’s storage field carries two decimal 
places, while BO23F’s storage field carries only one decimal place. 

When FMSO calculates DENs BO74, BO74A, BO23D, and BO23F in its levels 
program, these variables are defined as real numbers; therefore, for the computation of 
these DEN values and for the computation of the rest of the levels values, BO74, BO74A, 
BO23D. and BO23F have full floating point decimal fields. After all levels computations 
are complete, the values for BO74, BO74A, BO23D, and BO023F are stored in fields having 
a limited number of decimal places, and therefore, truncation occurs. The truncation 
doesn't significantly effect the accuracy of the BO23D values, however, because the sto- 


rage field for BO23D has eight decimal places. 
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Table 11. COMPARISON OF CARES AND LEVELS PROGRAM DEMAND 
AND REGENERATION DATA 


—— Demand (D) Regenerations (G) 


(CARES) (Levels) (CARES) (Levels) 
TH S690.00-004.2754 
TH H11285.00-182-3756 
TH H_1285-00-187-6676 Faas 003198 Toe n00 
TH H _5895.00-194-0145 es Ce ce 
THT N-o1-o3v-17a [429 faz f 493 [1.90 
TH H_130-01-029-2561 
TH 11 20040-01-032-9059 
TH H 2040-01-037-3691 2.39 2.30 
TH E 6603-01-112-6484 30.50 
7G H 3830-01-113-7212 2 25 
















































As the reader will see in the next section, using the truncated values stored for 
DENs B023F, BO74, and BO74A in the emulation program caused some differences be- 
tween the emulation program results and the actual SPCC program results. 

Since the DENs used in levels, BO23D and BO23F, were used in the emulation 
program listed in Appendix A, a standard record format such as CARES couldn't be 
used for input to the emulation program. Instead, a list of required DENs was assem- 
bled from a review of FMSO’s Levels Program Functional Description (FMSO Docu- 
ment Number FD-D0O1). As stated in the first part of this chapter, the DENs required 
for the emulation program were broken into four categories: 

e System constants -- Those input elements that are constant for all NSNs. 


¢ Four digit COG constants -- Those input elements that are constant for all NSNs 
having the same four-digit COG. 


¢ Unique input variables -- Those input elements that vary for each NSN. 


¢ Comparison data -- Those data elements used to compare the emulation program 
results with actual SPCC results. 
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All of the data elements in the four categories were requested from SPCC by DEN. The 
DINs requested for the system constants, four-digit COG constants, and unique input 
variables are shown in Tables 12 through 14. These tables also give the corresponding 
FORTRAN program variable names which are used in the emulation program in 
Appendix A. 


Table 12. SYSTEM CONSTANTS 


DEN Description Variable Curent 
Name In Value 
Program 


[v039 | Repair review eyeletime __—=SSC*~RT.OC*dSO 













In Table 12, the annual holding cost actually equals the sum of the obsolescence 
rate (DEN BO57). the time preference rate (DEN V108), and storage rate (0.01) [Ref. 5: 
p. O-23]. Also, the maximum number of quarters of safety stock is an input parameter 
on the contro] card image used to run the levels program. The current values are all 


initialized at the beginning of the emulation program in Appendix A. 


Table 13. FOUR DIGIT COG CONSTANTS 


DEN Description Variable 
Name In 
Program 


VOX 











The constants in Table 13 depend on the NSN’s four-digit COG symbol. These 


values are built into the emulation program in the COGVAL subroutine. 
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There are several misleading titles for the variables in Table 14. The values 
stored in the DEN BO023D field, gross system demand - end of lead time, are equivalent 
to the quarterly demand forecast values (DEN B074). The values stored in the DEN 
BO23F field, system RFI regenerations - end of lead time, are equivalent to the quarterly 
regenerations forecast values (DEN BO74A). Finally, discount quantity (DEN B061) is 
a musleading ttle, because the B06! value is not used to specify a price break quantity, 
but, instead, is used to specify a minimum buy quantity in the UICP levels program. 

There were no difficulties collecting the data elements for the current levels set- 
ting model beyond deciding which variables were necessary. The actual data collected 


for the 12 DLRs is listed by DEN in Tables 15 and 16. 




























Table 14. UNIOUE INPUT VARIABLES NEEDED FOR EACH NSN 
Name In 
Program 
Number of policy receivers 
Requisition frequenuv average 
Svstem reorder level low limit quantity (numeric stocking 
objective) 
Gross svstem demand during lead time 
Svstem RFI regenerations during lead time 
Svstem RFI regenerations -- end of lead time (units ‘qtr 
B023G 
Demand during repair problem turn around time 











Manufacturer's setup cost 

BolT uarterlv demand forecast 

First two digits of the four-digit COG 

Second two digits of the four-digit COG 

D120 Level of authority code -- Secondary Inventory Control 
Acuvitv (SICA) 





Nonconsumable item material support code NIMSC 
Acguisition advice code 
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Table 15. SPCC LEVELS MODEL INPUT DATA 


| | National Item Identification Number (NIIN) 


DEN 












bSL7-F00-00 
9CLE-C8T-00 
9L99-L81-00 

blO-F6P-00 
OTT8-688-00 


2 


CC a so |s 
noo 

po2sc 
BeDgF [3.91 | 61.5 LO 
nog] 60 [158 faa por fo 
[Boxs] 7.3] 1571) aslo kon Og | 
Ce io 
[5058] 07 | OU) COW EON Ono 
roost | 0 LO FON oo 
Pov [ojo fo JoJo |o__| 
pera [3523.79 ___|357___ 00s ont) 3.65) 
rcozs foo ___ | Os CO on 


¢ 



















ad | —P] 
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Table 16. SPCC LEVELS MODEL INPUT DATA (CONTINUED) 


<= National Item Identification Number (NIIN) 








oleest LIGh0 


169¢-LC0°-10 
P8P9-CII-10 


I8SZ-6C0" 10 





Ibi 1-6c0-10 












oo 3 oe fo [o | 
A023 
2 
pense | a7 24033 
BOtsE 
a a 
Fe a 
a CE 
45824.50 
a a a 
eossalo fo {o_o lo Jo 
rr [Oo fo jo fo _|s__fe_ 
a a CO 
cs Ea 
A 
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2. Emulation Program Results 
Tables 17 and 18 show a comparison of the initial output from the emulation 
program in Appendix A with the actual UICP levels program output as recorded in the 
CICP files. 


Table 17. EMULATION PROGRAM RESULTS VS. ACTUAL SPCC RESULTS 
COG, MCC, and NSN Emulation Emulation 
Program Program 


A 


R 0 


TH sooo [3 ij itr sir 
[ret H1285-00-182-3756 301301 dd 
[re 12ss-w0-is7-6676_ | 1 


7H 11 3895-00-49201230)| 1) a 
rir 6110-00-889-8n0_ [19s —*d id 
[7H H 1490-01-00 | 20 Ea ea eae 
TH H 1440-01-029: 25810) |Gis ummm | Gum yn ee 
rar zesoor-e3z-9089 [1d 
| 7H H 2010-01-037-3091_ [21 
THE 6608-01-112-6884 5a) 
7G H 5820-01-113-7212_ | 5 fo 





As noted in the last section, when the FMSO levels program stores the values 
for DENs B074, BO74.A, BO23D, and BO23F, truncation occurs. Since the emulation 
program uses these truncated values, some rounding errors occur. The differences be- 
tween the emulation program levels and the SPCC computed levels noted in Tables 17 
and 18 result from rounding errors in the emulation program. 

The rounding problem was resolved by computing the BO23F and BO74A values 
instead of using the truncated values. Since the DEN for quarterly demand (D), B023D, 
has a sufficient number of decimal places to prevent rounding errors, this value was not 
recomputed. The B074 value was set equal to the B023D value since they are computed 


from the same formula. 
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Table 18S. EMULATION PROGRAM RESULTS VS. ACTUAL SPCC RESULTS 
(CONTINUED) 


COG. MCC, and NSN Emulation Emulation 
Program ; Program 


7H H 4840-00-004-27 454 
TH H 1290-00-177-9946 


7H H 12$5-00-1$7-6676 
7TH H 358935-00-494-0145 
TH H 6110-00-889-8110 
7H H 1240-01-029-1741 
TH H 1440-01]-029-258] 
7TH H 2030-01 -032-9059 
TH H o2040-01-037-369] 
7TH E 6605-01-112-6484 
*G H S820-01-113-7212 





That is: [Ref. 3: pp. O-7 O-14 O-25] 


D = Bu7s = BO23D = D, + D;; 


where: 
D. = DEN BO2? or system recurring demand average: 
D, = DEN B622A or svstem recurring demand average from overhaul. 
2 BS = ee 


The regeneration values. DENs BO74A and BO23F. are computed using the 


same formula: [Ref. 3: pp. O-9 O-15 O-24 


G = BO74JA = BOI3F = RSR x CR+D,(1 — WOR); 


where: 
RSR = = DEN F009 or repair survival rate forecast; 
CR = DEN BO22B or forecasted number of carcasses returned per quarter; 
WOR = DEN Fwv7 or wear out rate forecast. 
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The RSR is defined as the percentage of items inducted for repair that can be 
expected to be returned to RFI condition [Ref 5: p. 3-16]. The WOR is defined as the 
percentage of items inducted for repair that can be expected to become NRFI 
[Ref 52ps s=10|: 

Although it appears that RSR = (1 — WOR), this is not the case. The com- 
putation of RSR includes surveys at the depot level only [Ref. 5: p. 3-16], while the 
WOR computation includes both depot level surveys and below depot surveys (1.e., from 
intermediate and organizational maintenance levels) [Ref. 5: p. 3-19]. 

The CR is a forecast of the number of carcasses per quarter expected to be re- 
ceived from Navy activities, excluding ships in overhaul. [Ref. 5: p. M-4] CR is com- 
puted as D, x (1 — WOR)/RSR. Notice that if this formula for CR is substituted into 


the equation for regenerations (G) above, G becomes: 
G =D,(1 — WOR) + D,(1 ~— WOR) 

=(D, + D,)(1 — WOR) 

= D(l — WOR). 


Reducing the equation for G 1s significant because it reduces the number of 
DENs for which data must be collected. In this case, the only additional DEN needed 
to calculate G is WOR (DEN F007) since the value for D (DEN B023D) is already being 
used in the emulation program. 

The WOR values collected and the newly computed G values for each of the 
12 sample DLRs are listed in Table 19. The values for G listed in Table 19 were com- 
puted manually. For future studies, the emulation program in Appendix A requires 
modification so that the WOR values can be input to the program and then used to 
calculate the G values. 

Also note that the WOR values for 3 of the 12 sample DLRs exceed ten percent. 
Recall that the CARES data base was used to select the sample DLRs. Since the 
CARES data base only contains RSR values, the assumption was made that a high RSR 
value equated to low attrition. The WORs for at least 3 of the 12 sample DLRs indicate 
that the items should not have been classified as low attrition DLRs. Future studies 
should include WOR as part of the sample selection criteria. 

When the G values listed in Table 19 were used as input to the emulation pro- 


gram, the emulation program levels matched the LICP program levels exactly, except 
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for the reorder level (R) and repair level (R,) for NSN 1440-01-029-2581. The LICP 
program output was R=6 and R,=5, while the emulation program output was 
R=7andR,=6. 


Table 19. WEAR OUT RATE (WOR) AND CAL- 
CULATED REGENERATION (G) VAL- 
UES FOR THE SAMPLE DLRS 


7H H §$40-00-004-2754 
TH H 1285-00-182-3756 
7H H 12835-00-187-6676 

7H H §895-00-494-0145 

7H H 6110-00-889-8110 
TH H 1440-01-029-258) 
7H H 2040-01-032-9059 
7H H 2040-01-037-3691 
7G H 5820-01-113-7212 
























































After exhaustive research by the author, an error in the UICP levels program 
was discovered. The emulation program result is correct. The following paragraphs 
explain the research done to find the LICP program error and then describe the error. 


From Chapter I], the basic repair level (R,) formula was: 
R, = DT, ss R al ZL 


Since the value of R, depends on the value of the basic reorder level (R), and both 
R and R, had quantity differences of equal direction and magnitude, the author sus- 
pected an error in the computation of R in the emulation program. 

When a complete review of the LICP program specifications proved that the 
emulation program logic was correct, the levels for the discrepant item were computed 
manually. Since the manual computations matched the emulation program results, a 


copy of the LICP levels program was obtained from F MSO. 
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Manually performing the UICP program’s steps using the data for NSN 1440- 
01-029-2581 produced results identical to those stored in SPCC’s files (i.e., 
R =6 and R, = 5). 

Since the normal distribution was used to compute the reorder level values, the 
normal distribution table in the UICP program was reviewed against the normal dis- 
tribution table in Reference 11. The table in the UICP program consists of 50 values. 
The first value in the UICP program’s table, “RISKTB (1) = 0.46017220,” corresponds 
to a normal deviate value (z) = 0.1, and is the value of the area under the normal curve 
and to the right of z = 0.1 (i.e., 0.46017220). Note that the area under the normal curve 
and to the right of z is stockout risk. 

The fourth table value (i.e., RISKTB (4) = 0.33457830) in the UICP table was 
erroneous. This value should have been RISKTB (4) = 0.34457830. This incorrect 
value associated with z = 0.4 produced the erroneous levels computations at SPCC for 
NSN 1440-01-029-2581. FMSO was informed of the UICP program error by the author 
and FMSO confirmed that the error in the UICP program was genuine [Ref. 31]. 


G. PROPOSED LEVELS MODEL DATA 
By reviewing the formulas presented in Chapter III, one can see that data for the 
following parameters needs to be collected to calculate the target minimum population 
size (K,), incremental reorder point quantity (R,), and reorder quantity (Q,): 
e Tork: 


UU -- The number of installed units of each DLR. 
c  -- The number of repair channels or stations at the repair facility. 
a  -- The average failure rate of each DLR. 
wu _--- The average repair or service rate per repair channel. 
« For Rk: 
D_~ -- Quarterly demand forecast for each DLR. 
G__ -- Quarterly regenerations forecast for each DLR. 
J -- Inventory holding cost rate; 
C_ -- Procurement unit cost for each DLR; 


C, -- Repair unit cost for each DLR; 


4 -- Shortage cost per requisition backordered; 
E- -- Military essentiality for each DLR; 
F  -- Quarterly requisition frequency forecast (i.e., requisitions per quarter. 
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© hor QO, : 


A -- Administrative ordering cost. 

D _ -- Quarterly demand forecast for each DLR. 

G_ -- Quarterly regenerations forecast for each DLR. 
I -- Inventory holding cost rate. 


C -- Unit cost of each DLR. 


The parameter values associated with R, and Q, are readily available from SPCC’s 
CICP files since they are used in the current model. Refer to Tables 15 and 16 for these 
values. The availability of data for the K, variables is discussed in the following sections. 

1. Number Of Installed Units (U) sre 

The data for the number of installed units is readily available from the WSF by 
having SPCC’s Systems Services Division (code 04232) run an A10 application program. 
A sample A1O printout is shown in Figure 7. The A10 program output can be provided 
on magnetic tape. 

Although the A10 printout appears complicated, it’s really very simple to inter- 
pret. [Ref. 32] Referring to Figure 7, the top line beginning with ”“Z0423TW” provides 
the following information: 

e ZO0423TW -- A code that identifies the requestor of the A10 run. 


e 008898110 -- The National Item Identification Number (NIIN), which is the last 
nine digits of the NSN. 


e $9286 -- The julian date of the run. In this case. $9 is 1989 and 286 is 13 October. 
e 21:09 -- The time of the A10 run. 


The next two lines, beginning with. “C3 7H,” and ”F27'0000000.0410,” provide 
identification data for this NIIN (1.e., 00-889-8110). The characters before the slash ( ) 
represent the DEN and the characters after the slash represent the data stored in that 
DEN. For example. the second line in Figure 7 begins with, “C3'7H.” The C3 means 
DEN C003 (the cognizance symbol) and the 7H is the value of this DEN for NIIN 
00-8$9-$110. 

The next six lines, the fourth through ninth lines in Figure 7, present informa- 
tion for one equipment into which NIIN 00-889-8110 is installed. The equipment is 
uniquely identified by its Allowance Parts List (APL) number. In Figure 7, the fourth 
line begins with the APL number (i.e., D9 57039655). Here, “D9” represents DEN D009 
and “57039655” represents the APL number. This APL number identifies the equipment 


20423TH 008898110 09286 


C3/TH C30/ C3A/H_C38/ = C42/6110 Ca/REGULATOR eRe B53/0001100.00 C5/EA 
F27/0060000.0410 £106/G 0MD/0000003.65 013¢/t Yb02/mD 


09/57039655 Oe raee 011/ ne D13/4t €7/0001 C7A/000 C7B/ 
031/AA 044/X £1/AN/SPS-40B, RADAR SET 

WHA: NX5071 4 00001 NOSELA ZC 00001 N41922 zB Seen RX5104 28 00001 
WHA: RO46B4 2A_00001 ROceBe Za Soars RO7171 ZA 00001 R20067 ZA 00001 
ALL WHA: 74 0054 7B 0008 7C 0001 720 0002 WHA TOTAL 000065 

EQPT Za 000056 78 000008 ZC 000001 7D 000092 EQPT/POP 0000067 PART/POP 00000134 


09/57039660 029/EP 011/ marta 013/4t €7/0001 €7A/000 C7B/ 
2 RA2525- 2 Phot neers a 00003 RO4663 ZD 00001 
‘waste 1_RO46? 00001 ZA 00001 ROS683 ZA 00001 


wA 00006 3 
T ZA 000045 ZB 000009 ZC 000002 ZD 000009 EQPT/POP 0000065 PART/POP 00000130 
57039665 029/E€P 011/ recor 013/4t €7/0001 C7A/000 C7B/ 


{dh D44/% ee se AR SET 
W058 te ZC 0000 Ris615 oe 90001 acces A 00001 RO3318 ZA 00001 
: reheat a: z0 O0001 f & 00001 & 00001 RO4672 ZA 00001 
Lt WHA: ZA 0050 Z8 0009 tat: 0001 ay 0011 near TOraL oooort 
OPT Za ‘90052 7 78 000016 ZC 000001 ZD 000012 EQPT/POP 0000081 PART/POP 00000162 


WHA TOTAL ZA 00150 ZB 00024 zc 00003 ZO 00022 TOTAL 000199 
EQPT TOTAL ZA 0000153 ZB 0000033 ZC 0000004 ZD 0000023 EOQPT/POP 00000213 
PARTS TOT ZA 00000306 ZB 00000066 ZC 00000008 70 00000046 PART/POP 000000426 





Figure 7. Sample A10 Application Program Output 


as an AN/SPS-40B, Radar Set (see the fifth line in Figure 7). To summarize, NIIN 
00-889-8110 is installed in the AN/SPS-40B radar set and the radar set has APL number 
57039655. 

The tenth through fifteenth lines in Figure 7 present information for another 
equipment. The equipment is identified by APL 57039660. So, Figure 7 shows that 
NIIN 00-889-8110 is listed as a part of three equipments having APLs 57039655, 
57039660, and 57039665. 


After the equipment information, the installed population of the NIIN is sum- 


. 


marized. In the case of NIIN 00-889-8110, the total installed population is 426 units 
(see the last line of Figure 7). 


The installed populations for the 12 sample DLRs are presented in Table 20. 
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Table 20. INSTALLED POPULATION FOR THE 
SAMPLE DLRS 


COG, MCC, and NSN Installed Population 
TH H §$40-00-004-2754 
7H H_1290-00-177-9946 














2. Average Failure Rate ( x ) 


The failure rate is defined as the number of failures that occur in a specified time 
interval and is expressed as the number of failures divided by the total equipment oper- 
ating hours or number of failures per hour of calendar time [Ref. 33: p. 25]. The LICP 
data bases don’t contain failure rate data. The Naval Sea Systems Command Logistics 
Engineering Activity (NAVSEALOGENGACT) in Mechanicsburg, PA also does not 
maintain failure rate data. However, NAVSEALOGENGACT sends 3M system data 
to the Naval Warfure Assessment Center (N WAC), Corona, CA for failure analvsis [Ref 
344]. 

NWAC screens the 3M data obtained from NAVSEALOGENGACT to remove 
all stock replenishment and preventive maintenance demand data. [Ref. 34] The com- 
putation of equipment and piece part failure rates are based strictly on corrective main- 
tenance actions. 

From the data for 100 weapons svstems and weapons related systems in its 
Material Readiness Data Base (MRDB), NWAC was able to provide the mean time 


between corrective maintenance actions (MTBCA)é¢ for four of the 12 sample DLRs. 


6 NWAC refers to the MIBCA as the part level mean time between failures (MITBF). 
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[Ref. 34] The NSNs for the DLRs, along with the corresponding MTBCA, MTBCA 
variance, and failure rate (in failures per hour) are listed in Table 21.7 


Table 21. MTBCA, MTBCA VARIANCE, AND FAILURE RATE FOR FOUR 
OF THE SAMPLE DLRS 


COG, MCC, and NSN MTBCA MTBCA Variance | Failure Rate 
(Hrs) (Failures Hr) 


TH H 5840-00-004-2754 24433.21 9786586.08 0.000040927 


7H H 1285-00-18 7-6676 137876.0 3801958275.0 0.000007252 
7H H 6110-00-889-8110 FOF 712.09 239862829.2 0.000014089 
7H H 1440-01-029-2581 23262.83 45096617.89 0.00004 2987 





MTBCA was estimated by NWAC using the following formula: 


Operating time 


MIBCA = oF Failures 


Then it is easv to compute the failure rate using the following formula: [Ref. 33: p. 24] 


Failure rate = TITBCA 
The operating times and number of failures used to calculate the MTBCAs listed in Ta- 
ble 21 are presented in Table 22. 


Table 22. OPERATING TIME AND NUMBER OF FAILURES USED TO CAL- 
CULATE MTBCA 


COGPVMCE, ands, Block Operating Time Number of Part Failures 
7H H $840-00-004-2754 | 1490426 


TH H 1285-00-187-6676 | 689380 
7H HI 6110-00-889-8110 | 1490426 
TH H 1440-01-029-2581 





NWAC wasn’t able to provide the operating time of each DLR listed in Table 
21 within the time frame allowed for this thesis; therefore, the operating time of the 


7 Table 21 values were drawn from sample data collected by NWAC from 1 January 1985 
through 30 June 1989. 
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block in which the DLR is installed and the actual observed failures of the DLR were 
used to estimate MTBCA. Block is a term used by NWAC to describe the DLR’s next 
higher assembly that is represented in a reliability block diagram.8 Note that there may 
be one, two, or several higher assemblies before the block level is reached. For future 
studies, NWAC may be able to provide part level operating times, which would improve 
the accuracy of the NTBCA estimates. 

The MIBCA variance was calculated by NWAC using the following formula: 
[Ref. 34] 


gt (MTBCAY 


= nt ’ 


where: 
S?. = The estimated variance of MTBCA; 
n = Total number of times the part failed. 


Notice that by using this variance formula, NWAC assumes that failures follow an ex- 
ponential distribution. Also, since NWAC couldn't provide part level operating time in 
the time allowed for this study, this is only a rough estimate of variance and may be verv 
imprecise when n is small. Like M{TBCA, the accuracy of the variance will improve 
when NWAC provides part level operating time data. 

The failure rates for the other eight sample DLRs had to be estimated using 
other methods. Two possible sources of estimates are quarterly demand forecasts and 
Best Replacement Factors (BRFs). If the quarterly demand forecasts were used to esti- 
mate the failure rate, one assumes that all demands for an item are due to failure. There 
are, however, demands due to new installations of equipment and increases in allowances 
at all levels of supply. Although SPCC excludes these types of demands as nonrecurring. 
it’s reasonable to assume that not all nonrecurring demands are filtered out. After all. 
a Variety of users. each having a different level of training and interest, are responsible 
for properly coding their requisitions as nonrecurring. There are also demands where a 
DLR requires adjustment or alignment only, but the ordering activity doesn't have the 
maintenance capability to do the adjustment. Demands for DLRs during equipment 
overhaul and for DLRs that were erroneously replaced also introduce inaccuracies when 


using demand as an estimate of failure rate. 


8 For a discussion of reliability block diagrams, see Reference 33. 
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The second possible estimator for failure rates, BRF, is partly based on demand; 
therefore, BRF suffers from the same inaccuracies as the quarterly demand forecast. 
[Ref. 22: pp. 1-5] BRF is the estimated replacement rate for an item and represents the 
number of times in a year an item is expected to be replaced in each of its applications. 
Calculated as the number of replacements or demands divided by the item’s population, 
BRF is based on demands from a sample population for a one year period. BRF is used 
to project replacements from a given population and estimate requirements when de- 
mand data isn’t available. It is used extensively in retail consumer (i.e, COSAL) and 
retail intermediate (i.e., load lists) allowance documents as an estimate of demand or 
usage. 

Notice that BRF projects replacements from a given population. BRF is the 
ratio of demand to the population of an item in service during a given time period (1.e., 
BRF = demand ' population vear). [Ref. 22: pp. 1-5] The demand data is pulled an- 
nually from 3M and CASREP files for active ships only. No demand from overhaul, 
new construction, reserve, or foreign ships js included. Shore station demand is also not 
included in the BRF computation. 

The number of active ships for the demand sample is narrowed even further 


using the following criteria: [Ref. 22: p. 3] 


e The ship must have submitted 750 usage documents during the past year. A usage 
document is a copy of a requisition for material. 


¢ The ship must have submitted ten usage documents per month for at least ten 
months of the past vear. 


e The ship must have submitted 80 percent of the average number of usage docu- 
ments for all ships of its type or class. 


e A manual review is conducted by NAVSEALOGENGACT to include or exclude 
individual ships based on any special considerations. 

Once the sample ships are selected, a replacement factor for the past year 1s 
computed. [Ref. 22: pp. 1-5] For each NSN, the total demands from the ships in the 
sample are divided by the total NSN population from the ships in the sample to get the 
replacement factor. Note that the demand and population data are for the sample ships 
only, That is, they are a subset of total demand and total population. The replacement 
factor is used as an input to a simple exponential smoothing equation to forecast the 
BRF. 

BRF is similar to failure rate in that BRF and failure rate are both ratios mea- 


sured over a given period of time. [Ref. 22: p. 2] Failure rate, however, is the ratio of 
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failures to operating hours during a given time period (i.e., a = number of failures / total 
operating hours). while BRF is the ratio of replacements to population during a given 
time period. BRF and @ are both used to predict the number of events expected in some 
future period of time for some known population, and both are subject to bias due to 
faulty classification (i.e., an item was replaced, but didn’t fail). However, a BRF can be 
zero if: 


e The item wasn’t demanded because it never failed. 


¢ The item wasn’t demanded because when it failed, it wasn’t replaced. Instead, the 
next higher assembly was replaced. 


¢ The item wasn't demanded because when it failed, the individual parts within that 
item were replaced (i.e., the item was repaired locally). 
So, an item can have a BRF equal to zero even if it experienced failures [Ref. 
22: p. 2]. Thus, BRF will be less than or equal to a [Ref: 22: p. 4]. Reliability theory 
provides another way to look at this problem. [Ref: 33: p. 208] Here: 


Qs crem = a4 a OR ae Xe +.44+ Xp, 


where %,. o3,....4, are failure rates for the subassemblies that make up the system. If 
a system consists of subassemblies A, B, C and if A fails, causing the system to fail, a 
failure occurrence should be assigned to both subassembly A and the svstem. With the 
BRF. a replacement occurrence would only be assigned to the svstem if the system was 
ordered from supply. Likewise. a replacement occurrence would be assigned to subas- 
sembly A if it were ordered. Thus, BRF is a function of the type of failure and the 
maintenance philosophy. 

In the case of a DLR. the organizational level of maintenance will usually de- 
mand the DLR itself or the next higher assembly. If the failed DLR (1.e., a circuit card) 
is a part of a larger DLR (1.e., a radio receiver) and the organizational level removes and 
replaces the circuit card, the circuit card BRF reflects the failure, but the radio receiver 
BRF does not reflect the failure. If, however, the radio receiver was replaced, a demand 
for the receiver would register at the organizational level and a demand for the circuit 
card might be recorded at the repair depot if the circuit card is replaced from supply and 
repaired later. 

Recall that NWAC provided failure rate data for four sample DLRs. In order 
to get an idea of the magnitude of difference between failure rate, BRF, and forecasted 


quarterly demand, the failure rates obtained from NWAC were converted from 
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failures, hour to failures/year? and the quarterly demand forecasts were converted to re- 
placements per vear.!0 The failure rates, BRFs, and demand (converted to 
replacements, year) for the four DLRs are presented in Table 23. 


Table 23. FAILURE RATE VS. BRF AND DEMAND DATA FOR FOUR OF 
THE SAMPLE DLRS 


ales Yo (een eemenc Yr) | (Replacements. Yr) 
PAT fsa 0.073742 
0.002203 
0.034329 









It can be seen that neither the quarterly demand forecasts or the BRFs are ac- 
curate estimates of failure rate, but the use of BRF is recommended for future studies 
based on the results presented in Table 23. 

3. Number Of Repair Channels (c) 

The number of repair channels, or stations, at each DOP is not available in 
SPCC’s UICP files. Repair channel information was gathered through telephone con- 
versations with DOP representatives for the 12 sample DLRs. Through discussions with 


the DOPs, several findings are important to note for future studies. 


¢ The number of repair channels at a particular DOP mav change as often as each 
six months, particularly for electronic DLRs. SPCC’s semiannual workload con- 
ference provides the DOPs with an estimate of the workload for the next six 
months. Based on this estimate, a DOP may reallocate skilled workers to other 
projects when repair work drops off or increase the number of repair channels as 
workload expands. All of the DOPs for the 12 items sampled had enough skilled 
workers and equipment to expand the number of repair channels by at least one. 
For future studies, it’s reasonable to assume that the number of repair channels 
remains constant for the six months between workload conferences. 


¢ Different DOPs have different production stages in the repair process and may 
have a different number of repair channels in each stage. The repair process 1s 
dependent on the DLR being fixed, the DOP structure, and the DOP repair 
equipment. The three most common stages can be described as testing fault 


9 The failure rate was converted to failures, year by multiplying the failures, hour value by $760 
(i.e., the number of hours in a year). 


10 To convert forecasted demand to replacements/year, the quarterly demand forecast (B023D) 
was multiplied by four to get an annual demand estimate. The annual demand estimate was then 
divided by total population to get the replacements, year. 
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isolation, repair, and inspection. For the 12 DLRs sampled, three DOPs were using 
more than one repair channel and all three DOPs had fewer testing. fault isolation 
and inspection stations than repair stations. Assuming that the actual repair time 
was the largest part of the service time, the number of repair channels in the repair 
= was used to represent the number of repair channels variable for the proposed 
model. 


¢ Collecting repair channel information can be done more efficiently at the SPCC 
workload conference held every six months. SPCC would have to tell all DOPs to 
bring the information to each repair conference. Also, to get the repair channel 
information into the LICP data base would require adding a data field or redesig- 
nating an unused data field for this purpose. While adding a new data field is un- 
realistic, redesignating a field no longer used is a possibility. Coordinating repair 
channel reporting and finding an unused data field were tasks that couldn't be done 
in the time allowed for this thesis, but that must be accomplished before a large 
sample of DLRs is used in an expanded study. 


e Although one of the selection criteria for the sample NSNs was to find a specialized 
repair activity, the experience gained by the author in this study suggests that no 
DOP repairs less than about 30 line items for the Navy. The number of line items 
repaired varies each six months with the workload forecast. 


¢ For all of the 12 sample DLRs, the repair channels were not dedicated to the DLR 
of interest. This was particularly true in the case of circuit cards where test and 
repair equipment is designed to repair many different types of circuit cards. This 
is significant in that queueing time for a particular item is dependent on the service 
time for the item being serviced and the service time for all of the different types 
of items already in the queue. For this study, the average service times collected 
from the DOPs were for the individual item and not the repair channel. 
4. Average Repair Rate Per Repair Channel ( » ) 

As noted in the last section, repair rates per channel can't realistically be used 
because there may be many different items being fixed by each repair station. Instead, 
the average repair time for each individual item in the sample was collected from the 
DOPs. 

The question may be: why not use RTAT? To understand why RTAT is not 
an appropriate estimate of uw requires an understanding of how RTAT is being measured 
dt orCc, 

While SPCC maintains a forecasted RTAT, this value doesn’t accurately reflect 
the service time because RTAT includes other time elements in addition to the service 
or repair time. SPCC defines RTAT as the time from receipt of a repair funding docu- 
ment and a carcass at the DOP, to the time the DLR is reported into A condition [Ref. 
28]. In practice, SPCC knows that a funding document and a carcass are available when 
a TIR is received transferring a carcass from F to M condition. Thus, the M condition 


TIR starts the RTAT clock and the A condition TIR stops the RTAT clock. The key, 
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then, is determining when the M and A condition TIRs are sent, but this depends on the 
activity. Navy organic DOPs, reporting commercial DOPs, and nonreporting commer- 
cial DOPs all have slightly different procedures. These procedures are discussed in the 
following sections. 
a. Navy Organic DOP 

Organic DOPs are usually Naval shipyards, NESECs, weapons stations and 
ordnance stations. As previously discussed, organic DOPs have DSPs that send the 
TIRs to SPCC and store F condition carcasses. The DSP for a shipyard is usually the 
local NSC and the DSP for a repair facility not near a supply center is the repair facility’s 
supply department [Ref. 12: p. 3]. After the DSP gets an induction order from the DOP, 
it pulls the material, ships the carcass, and submits the TIR reporting the item into M 
condition. The RTAT clock then starts. When the DOP completes repair, the item is 
shipped back to the DSP for packaging and storage or shipment. The TIR reporting the 
item in A condition isn’t sent until the item is either back on the shelf or shipped. In 
any event, it’s easy to see that RTAT contains shipping time, receiving time, DOP ad- 
ministrative time, queueing time, awaiting parts time, servicing time, packaging time, 
and DSP administrative time. It should be noted that if awaiting parts time is antic- 
ipated to be longer than 30 days, the DOP usually sends the item back to the DSP until 
parts are available. The DSP then sends a G condition TIR to SPCC (which stops the 
RTAT clock). At least one study at the Naval Postgraduate School, however, shows 
that some DOPs don’t extensively use the G condition TIR. [Ref. 26: p. 42] Thus, 
actual RTAT observations may contain a large amount of awaiting parts time. 

b. Commercial Reporting DOPs 

Commercial reporting DOPs are those using the Commercial Asset Visibil- 
ity, Phase I] (CAV II) system. The statement of work in SPCC’s CAV I] contract states 
that, “CAV II allows the commercial DOP to report in the same fashion as a Navy or- 
ganic DOP.” In fact, the commercial DOPs using CAV II report RTAT that has no 
shipping time and little administrative time when the computer terminal for doing the 
TIRs is located at the DOP (i.e., the vendor’s plant). There are large commercial ven- 
dors that have one CAV II terminal supporting DOPs in several geographical areas. 
These large vendors have an administration time similar to that of an organic DOP, but 


no shipping time in their RTAT observations. {Ref. 35} 
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The CAV II statement of work also states: 


Upon receipt of a delivery order to begin repair of an item previously reported as a 

receipt. the carcass is to be reported as an induction under the Repair Cycle Docu- 

ment Number (RDCN). 
So, unlike the organic DOP, the Commercial DOP using CAV II already has the carcass 
and can schedule the repair before the M condition TIR is sent. Upon completion of 
the repair, the commercial DOP reports the date the repair was actually completed on 
the A condition TIR. This actual completion date, however, is not used to compute the 
RTAT. Instead, the TIR transmission date is used to calculate the RTAT. The actual 
completion date is input to an off line data base at SPCC and used to monitor contractor 
administrative processing time. [Ref. 35] 

Currently, 53 of the 200 commercial DOPs use CAV II. The work done at 
these 53 DOPs accounts for 80 percent of SPCC’s repair dollars [Ref. 28}. 

c. Commercial Nonreporting DOPs 

Commercial nonreporting DOPs are those activities not using the CAV II] 
system. Although there are about 147 of these DOPs, they account for only about 20 
percent of the commercial repair dollars. These non-CAV II] DOPs submit a monthly 
repair status report to SPCC. The repair status report provides the induction dates and 
completion dates for DL Rs entering or leaving the repair process during the past month. 
SPCC manually calculates the RTAT from these reports and enters the RTAT into the 
CICP files. Although not timely, RTAT calculated from the monthly repair status re- 
ports contains less administrative time than either an organic or a CAV IT DOP because 
the RTAT is calculated using induction and repair dates instead of TIR transmittal 
dates. 

After researching the different ways RTAT observations are being meas- 
ured, it's apparent that RTAT is not a good estimate for the average repair rate. 
Therefore, data was collected directly from the DOPs for both number of repair channels 
(c) and average service rate (). 

5. Summary 
All of the variable data needed for the proposed model were available from the 
LICP files except for the: 
e Number of repair channels (c). 
e Average failure rate (a). 


e Average repair rate per channel (2). 
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The data for c and uw were collected directly from the DOPs. The data for a can be ob- 
tained from NWAC, if available, or can be estimated from quarterly demand forecast 
(D) or BRF from the UICP files. The demand (B023D) data available in the UICP files 
was presented in Tables 15 and 16. The data for c, » , BRF, and « (when available) are 
presented in Table 24. RTAT is also presented for information. 


Table 24. ADDITIONAL DATA NEEDED FOR THE PROPOSED MODEL 


COG, WICC, and NS as Repair Rate | BRF ae Rate RTAT 
Channels | ( uw ) Qtrs 
(c) Hours/unit rete 


Tiseoocons[1 fs for _fossena [sr | 
Tritt onooos-sii0f1 [8 oon [ovens [056] 
Pri veorses.rna ft [55 Poors | oases [0.0 
THT 13H0-01-029-2581 1-28 +00 o0oan2 pos 
TH 2040-01-032-9059 | 1 [unknown | 0.0034 | unavailable [2.7 
TH H 2070-01-037-3691 [1 [1288 0.14 | unavailable [40 
THE 6605-01-112-6484 
























Note that for NSN 2040-01-032-9059, the repair rate (u) was not recorded. The 
DOP, Sperry Marine, was unable to extract the repair hours per unit for this NSN. The 
item i$ a periscope panel that has a light fixture and two knobs mounted on a metal 
plate. [Ref. 36] The item is usually repaired or refurbished as part of the repair work 
done on entire periscope systems. The hours spent working on the periscope panel are 
not specifically tracked, but are absorbed into the total hours spent working on the 


periscope. 
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V. ANALYSIS OF THE PROPOSED MODEL’S ASSUMPTIONS 


The assumpuons for the proposed low attrition DLR inventory control process were 
presented in Chapter III. Four of the model’s key assumptions are addressed in this 


chapter. The assumptions discussed are: 


e That a M M1K.K or M M.c’kK,K queueing model is appropriate for the repair 
process. 


e That the item manager (IM) at the ICP has total asset visibility. That is, the IM 
has access to information about the number of units installed, wholesale RFI units 
on hand. retail intermediate RFI units on hand, retail consumer RFI units on hand, 
and NRFI units on hand. 


e That the IM has visibility of the number of repair channels at the DOPs, the failure 
rate for each DLR, and the service rate for each repair station. 


e That NRFI DLRs enter the repair system as soon as they are removed from the 
primary svstem and shipped to the DSP or DOP. Alternatively, carcasses are in- 
ducted for repair in batches equal to a specified repair quantity. 

A. THE M/M/1/K/K OR M/M/C/K/K ASSUMPTION 
1. Arrivals 
The validity of two assumptions concerning arrivals must be examined: 


e The assumption that interarrival times follow an exponential distribution. 


e The assumption that the failure rate and the arrival rate are equivalent. That is, 
when a DLR fails, the model assumes that the DLR enters the repair system im- 
mediately.11 

For the moment, assume that the failure rate and the arrival rate are equivalent. 
In this case, the mean time between failures (MTBF), or mean time between corrective 
maintenance actions (M{TBCA), represents the interarrival time. Since failure rate esti- 
mates Were only available for four of the sample DLRs, examination of the exponential 
interarrival time assumption must be restricted to these four items. 

Under both the M.M1K,K and M M'°c’K-K assumptions, the interarrival 
time is assumed to follow an exponential process. If interarrival times follow an expo- 
nential distribution, then the square of the mean should be approximately equal to the 
variance [Ref. 11: p. 156]. In this case, the mean is the mean time between corrective 


maintenance actions (M{TBCA). If the square of the mean and the variance are 


11 This assumes batch inductions are not used. 
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expressed as a ratio, referred to as the squared coefficient of variation ( C? ), then this 
S? 
(MTBCAY’ 
and the MTBCA variance were obtained from the Naval Warfare Assessment Center 
(NWAC) and were presented in Chapter IV. The MTBCA, MTBCA variance, and C? 


for four of the sample DLRs is presented in Table 25. 


ratio, C? = should be approximately equal to one. Recall that the MTBCA 


Table 25. MTBCA, MTBCA VARIANCE, AND C FOR FOUR OF 
THE SAMPLE DLRS 


Code (MCC). and NSN Variance 
TH H 6110-00-889-8110 
73262. 

















Since none of the C? values in Table 25 are close to one, the arrival pattern doesn’t ap- 
pear to be exponential [Ref 20: p. 156]. However, as noted in Chapter IV, the MIBCA 
and MTBCA variance are only rough estimates. Additional analysis must be done after 
NWAC provides more precise part level failure rate data. 

The implied assumption that the failure rate is equivalent to the arrival rate is 
the second issue that must be examined. Clearly, from the discussion of the induction 
process in Chapter IV, not all DLRs enter the repair process immediately after failure. 
A DLR’s entry into the repair process is often determined by the need for ready for issue 
(RFI) assets and repair budget dollars available. If a failed DLR is required for imme- 
diate use or to replenish stock, and repair funding is available, the item will be inducted 
for repair immediately. If, however, the DLR isn’t required immediately, or repair 
funding isn‘t available, the carcass is stored at the designated support point (DSP) until 
it’s required and funding is available. 

Since it’s unlikely that the system used to induct carcasses for repair will change 
soon, the interarrival times should be measured directly. The historic time between ar- 
rivals can be measured for each DLR by using the Transaction History File (THF) dis- 
cussed in Chapter IV. SPCC maintains two vears of THF data, but a program to 


calculate the interarrival time from the THF data must be developed in a future study. 
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2. Service Rate 

The M M.1K K and M.M/c’K’K queueing systems also assume an exponen- 
tial service rate. As noted in Chapter IV, average service rates were available at most 
DOPs, but individual service times for each item serviced was not provided; thus, vari- 
ances could not be calculated. From discussions with DOP representatives about the 
repair processes used for the sample DLRs, the author believes that the service rates for 
the sample DLRs are closer to being constant than exponential. 

Better data needs to be collected in a future study to examine the exponential 
service rate assumption. Also, the impact of servicing several different DLRs at the 


same repair station must be researched in a future study. 


” 
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3. Number of Servers or Repair Channels 

The number of servers used at the DOPs varies, but, as noted in Chapter IV, 
all of the DOPs contacted for this study had the capability to increase the number of 
repair channels by at least one. 

As discussed in the last chapter, future work on the proposed model should in- 
clude coordinating the reporting and recording of the number of repair channels being 
used at each DOP. Assuming that information about the number of repair channels will 
be automated. the program developed to set inventory levels should be designed to cal- 
culate the target. minimum population (S,) based on the single server or multiple server 
case as appropriate. 

4. Queueing System Capacity and Source Population Size 

The assumption that the queueing system capacity and source population size 
(the K k in the M Mock K notation) are finite and equal is valid for low attrition 
DLRs. It should be noted that the source population for a DLR with a low attrition 
rate may be less stable than a population of industrial machines for which the 
M M 1K K and M McK K queueing systems were designed. Installation and retire- 
ment of equipment affect installed population, while allowance changes, attrition, and 


emergency procurements effect the spares population. 


B. THE ITEM MANAGER HAS TOTAL ASSET VISIBILITY 

As discussed in Chapter IV, the IM can have visibility of installed units by using an 
A10 application program retrieval. The number of units installed is an important input 
variable to the proposed levels computation and it is also a part of the total assets 


owned. 


a 


The IM also has visibility of NRFI units being stored at a DSP or being repaired 
at a DOP, because the status of all failed DLRs at DSPs and DOPs is reported under 
the TIR system. However, the 1M doesn’t have visibility of failed units in route to the 
DSP or DOP from the end user. For the purposes of this model, having visibility of 
NRFI units at the DSPs and DOPs is sufficient to accurately represent reality. 

The visibility of RFI spares at all levels of supply -- wholesale, retail intermediate, 
and retail consumer -- isn’t possible with current information systems. The wholesale 
RFI on hand balances and the RFI on hand balances for the retail intermediate activ- 
ities that submit daily TIRs are visible to the IM. However, the RFI on hand balances 
from retail intermediate activities such as tenders and AFSs are not visible to IMs. In 
addition, no retail consumer level on hand balances are visible to the IMs. 

While the RFI on hand balances are not necessary to compute levels with the pro- 
posed model, these RFI balances are important when comparing what the Navy already 
owns to the quantity calculated by the proposed levels model. That is, after levels are 
computed, the next step involves comparing inventory position (IP) with the reorder 
level and placing an order of quantity Q if the IP is at or below the reorder level. The 
total quantity owned, which includes RFI spares at all levels, must be visible to calculate 
the IP. 

This lack of visibility of RFI spares is a major issue that must be resolved through 


future study. There are two possible solutions to the dilemma: 


e Wait until the Navy's Secondary Item Weapon System Management (SIWSM) 
information system can provide asset visibility [Ref. 2: p. D-1]. 


e Use allowance information to estimate the RFI units owned. 


Developing IM asset visibility down to the lowest echelon of supply is one of the 
SIWSMI system's objectives. [Ref. 2: p. D-1] This means that the current LICP con- 
straint of 45 transaction reporting activities will be eliminated and that all retail inter- 
mediate and shore based retail consumer levels will be required to submit asset status 
reports whenever the on hand balance or material condition of a DLR changes. 

Although the SIWSM system will eventually provide excellent asset visibility, the 
project isn't scheduled for completion until 2005 [Ref. 2: p. 7]. Also, afloat retail con- 
sumer activities aren't included in the SIWSM system planning document. Therefore, 
allowance information appears to be the best estimate of on hand assets for the present. 

Allowance information, however, has some drawbacks when used as an estimate of 


RFI assets on hand. The DLR allowance for a ship only indicates how much RFI 
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material should be on hand; thus, the allowance will usually be greater than or equal to 
the on hand quantitv. One way to compensate for this overestimation would be to 
subtract the on order quantities for nonreporting retail intermediate activities (i.e., ten- 
ders) and retail consumer activities from the allowance quantities and use this adjusted 
allowance as an estimate of the on hand RFI balances. Excluding the on order quanti- 
ties might be an effective compensation tool since retail activities usually order DLRs 
soon after issuing them from stock. That is, retail activities always try to keep their full 
allowance quantities of DLRs on hand or on order. Using this procedure to estimate 
the RFI on hand balances would, however, only be accurate for a verv short time since 
the quantity on order for each DLR can change often. 

Unfortunately, a single number representing the Navy wide allowance for each DLR 
isn't available in any UICP data base. Instead, allowance information is fragmented into 
numerous allowances for Coordinated Shipboard Allowance Lists (COSAL), Fleet Issue 
Load Lists (FILL), Tender And Repair Ship Load Lists (TARSLL), prepositioned war 
reserve stocks, nuclear reactor plant (Q) COSALs, Fleet Ballistic Missile (FBM) sub- 
marine protection levels, Strategic Weapons System (SWS) COSALS, test equipment, 
and Operational Support Inventory (OSI) items. OSI items include allowances con- 
tained in Consolidated Shore Based Allowance Lists (COSBAL), geographic support al- 
lowance documents, Ships Intermediate Maintenance Activity (SIMA) allowance lists, 
special project allowance lists, and Selected Restricted Availability Stock Lists (SRASL) 
[Ref. 37]. In addition, other allowance lists and or small unauthorized inventories may 
eXIst. 

While finding and investigating all of the allowance sources was bevond the time 
allowed for this thesis, Table 26 lists the allowance documents that were investigated. the 
SPCC source file that contains the allowance information, and the SPCC points of 
contact (POCs). Table 27 provides the actual total allowance quantities from the doc- 
uments listed in Table 26 for each of the 12 sample DLRs. 

An entire thesis could be devoted to developing, retrieving, and combining allowance 
information for use with the proposed model. Finding and retrieving the information 
necessary to make the total asset visibility assumption valid for the proposed model will, 


thus, be a major task. 
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Table 26. ALLOWANCE INFORMATION SOURCES AND POCS 


Allowance Document Source File or Data Base SPEG POG 


All ships’ Hull. Mechanical, Electrical, | Ship’s History File Vera Miller 
Ordnance & Electronic (HMEO&E) Code 04221 
COSALSs A/V 430-4349 


FILY PARSE Focus data base Kathy Bower 
Code 03312 
A.V 430-5181 


Retail OSI Allowances Focus data base Glenn Huffer 
Code 03352 
A:V 430-3681 


FBM Protection Levels Focus data base Judy Mannix 
Code 8432 
A V 430-7111 


Prepositioned War Reserve Manual Listing Larry Kohler 
Code 0411 
A‘V 430-2407 


a 27. ALLOWANCE INFORMATION FOR THE SAMPLE DLRS 


Allowance From: 


—— lS HMEOLE MEILI Retail | FBM Prepositioned | Total 
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C. ITEM MANAGER VISIBILITY OF REPAIR CHANNELS, FAILURE RATE, 
AND REPAIR RATE 

As discussed in Chapter IV, the IM doesn’t have visibility of the number of repair 
channels (c) used at the DOPs, failure rate (x) for each DLR, or repair rate (2) for each 
repair station. 

Although manually collected for this thesis, the automated collection of the data for 
c and w will require extensive coordination with SPCC’s Repairables Support Depart- 
ment (code 03). As discussed earlier in this chapter and in Chapter IV, the data for c 
could be collected at SPCC’s semiannual repair conferences. Reporting and recording 
the individual repair or service rates requires the development of new transaction re- 
porting procedures for Navy DOPs, CAV II commercial DOPs, and non-CAV II com- 
mercial DOPs. 

Developing the new transaction reporting procedures was beyond the scope of this 
thesis; however, the monthly repair status reports submitted by all DOPs could be used 
as a tool to collect actual repair times for DLRs. In addition, the possibility of including 
actual repair time on transaction reports must be investigated as a future thesis topic. 

As already discussed earlier in this chapter, the failure rate doesn’t accurately rep- 
resent the arrival rate, but interarrival rates can be measured by using THF data and a 
computer program designed to calculate the time between arrivals from the THF re- 


cords. 


D. NRFI DLRS ENTERING THE REPAIR PROCESS 

As discussed in Chapter II], the proposed model assumes that carcasses are inducted 
for repair as soon as they are removed from their parent equipment and shipped to the 
repair facility. The model can also be adapted for batch inductions. That is, when the 
number of failed units for a given DLR reaches a level equal to the repair quantity, all 
of the on hand carcasses are inducted for repair. 

The assumption that failed DLRs enter the repair process as soon as they are re- 
moved from the primary system and shipped to the DOP is not valid in many cases. 
This assumption supports the assumption that the failure rate and the arrival rate are 
equivalent, but, as already discussed, neither of these assumptions accurately represents 
reality. By measuring actual interarrival times from the THF, an assumption about 
when a failed DLR enters the repair process is not necessary to support the failure rate 


equals arrival rate assumption. 


83 


An assumption about when not ready for issue (NRFI) DLRs enter the repair pro- 
cess is necessary, however, to plan inductions to the repair process. In reality, on hand 
RFI assets, customer demands, and the repair budget determine what items are repaired 
and when those items will be repaired. As seen in Chapter IV, half of the initial sample 
randomly selected had NRFI units on hand, but no repair inductions for at least two 
years. So, compared to current practices, neither the immediate induction assumption 
or the batch induction assumption is accurate for all DLRs. DLRs scheduled for repair 
at the semiannual repair conferences are being inducted for repair as soon as the car- 
casses are received. For these items, the immediate repair process entry assumption does 
hold, but the mix of items scheduled for repair may change every six months. As dis- 
cussed in Chapter IV, for those items where the immediate repair assumption does not 
hold, the proposed inventory control process will only work if current practices are 
changed. 

The question for further study is whether or not established procedures should be 
changed to fit the model or a different model used to accurately represent current prac- 
tice. Does the Navy save money by not repairing all carcasses when received? The au- 
thor’s personal experiences with FBM submarine priority one requisitions for DLRs 
suggests that the Navy may not be saving money. The Atlantic fleet FBM submarine 
force spends a tremendous amount of time and money purchasing new DLRs, so that 
ships can meet deployment schedules. Often, there are F condition assets on the shelves 
at the DSPs, but not enough time to make repairs and meet deployment schedules. In 
addition to the money for new DLRs, additional purchasing personnel and expediting 
costs are incurred. Again, more study must be done on this subject before any inventory 


control process decision can be reached. 
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VI. CONCLUSIONS AND RECOMMENDATIONS 


The major thrust of this thesis has been to see if data for the proposed inventory 
process can be collected and to identify issues that need further research. As pointed 
out at the end of the last chapter, major changes in the repair induction procedures 
would be required for the proposed inventory control process to function properly. 

Certainly, for a small sample, this thesis has shown that the data can be collected 
for the proposed levels model; however, the ability to use the levels output to control the 
inventory process is an issue that this thesis did not evaluate. Asset visibility, as dis- 
cussed in Chapter V, is the major stumbling block to effectively controlling the proposed 
inventory control process. 

For a large sample of DLRs, the automated or semi-automated data collection 
procedures and processes required to support the proposed model do not exist, but can 
be developed without a Jot of capital investment. Developing these automated or semi- 
automated data collection procedures and processes will, however, require a large in- 
vestment of time. This large investment could be made by several thesis students 
working in several areas simultaneously. These areas for further study include: 


e Developing a program to calculate the interarrival times from Transaction I listory 
File (THF) data and determining the distribution of the interarrival times. 


¢ Programming the proposed levels setting model to accommodate both the single 
server and muluple server cases. 


e Coordinating, through SPCC, the reporting and recording of the number of repair 
channels used at each DOP. 


¢ Coordinating. through SPCC, the reporting and recording of service time data from 
the DOPs. 


¢ Resolving the lack of item manager asset visibility issue by collecting and using al- 
lowance data as an estimate of the ready for issue (RFI) spares on hand at non- 
transaction item reporting (non-T1R) activities. 


e Performing a cost analysis that compares the cost of immediate induction to the 
repair process and current practices. 


Without further study, it’s impossible to make conclusions about the feasibility of 


the proposed model. As shown, significant study is still required. 
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APPENDIX A. SPCC UICP DLR MODEL PROGRAM 


//DEXA9864 JOB (9864 ,9999),'M. DEXTER' ,CLASS=A 
//_ EXEC FORTVCLG, IMSL=IMSL10 


//FORT.SYSIN DD * 
dotsdedsdedcdedededededetete tote tedetede te fede BPD SCR ESC ERLE TERA SPCR TPCT ACSC AER ICR ERASE TRERER CT 


* TITLE : UICP REPAIRABLES MODEL * 
* DATE : 23 AUGUST 1989 * 
* AUTHOR : MARK D. DEXTER, LT, SC, USN * 
¥ I GRATEFULLY ACKNOWLEDGE THE HELP I RECEIVED FROM PROFESSOR* 
* A. W. MCMASTERS. MANY OF THE IDEAS AND CODING FOR THIS * 
% PROGRAM WERE EXTRACTED FROM PROFESSOR MCMASTERS' REPMOD1 * 
* PROGRAM. * 
wo gia 8 Ise SOs 7 
* COMPILER: FORTRAN LEVEL 77 VERSION 4.1 * 
ve * 
Sevesesete sede ctedetevedesote toe tose tedede sede detec tek Rete Ke Teese ete Pee CTT eI CE ATSIC IC TCT UCT TCT TOTS 
zs DESCRIPTION * 
Br re ee a ae ee cs ee ae ee de Ce cee ea cee ae aa ie a cs ag ae ae eee 


vs * 


* THIS PROGRAM USES THE SPCC LEVELS FORMULAS TO COMPUTE THE REORDER * 
* LEVEL, REORDER QUANTITY, REPAIR LEVEL, AND REPAIR QUANTITY FOR DEPOT * 
* LEVEL REPAIRABLE (DLR) MATERIAL. THE MAJOR REFERENCE USED WAS THE 
% FLEET MATERIAL SUPPORT OFFICE'S (FMSO) UNIFORM INVENTORY CONTROL 

* PROGRAM (UICP) FD-DO1 MANUAL. THE FD-DO1 MANUAL IS DATED 31 MARCH * 
%* 1984 WITH CHANGE 1 DATED 22 FEB 1985. oa 


+ + 


ve we 
Setedodetedetetedetetedete tote te tedehededeRe Le PeT RIERA ER IIA RRR TTR TARE RTARTA ERE RR IS 
* VARIABLE DEFINITIONS * 
Seteveteveseveve dete vedevetoveve te vetevevetovede sede seve sete Fe Fe Terese te feveds Te Fee se TeK FeTeK eH FEF Nee Fete Fe Fe Fe Fe TPT TK 
* AAC = ACQUISITION ADVICE CODE. (DEN E089) * 
* AC = ADMINISTRATIVE COST TO REPAIR ONE ITEM. (DEN V016) ¥ 
ve ASI = MANUFACTURER'S SETUP COST. (DEN B058) * 
7 AUTHLV = LEVEL OF AUTHORITY. (DEN D120) * 
* Al = PROCUREMENT ORDERING ADMINISTRATIVE COST. (DEN V043) * 
“ A2 = REPAIR SETUP COST. (DEN BO58A) * 
* COG1 = TWO DIGIT COGNIZANCE SYMBOL (DEN C003) ¥ 
* COG2 = THE THIRD AND FOURTH DIGITS OF THE 4 DIGIT COG. THE * 
* FIRST DIGIT OF COG2 IS THE ITEM'S ITEM MILITARY * 
* ESSENTIALITY CODE (IMEC). THE SECOND DIGIT TELLS US * 
* IF THE ITEM IS WEAPONS SYSTEM RELATED AND THE RANGE * 
* OF THE REQUISITION FREQUENCY. (DEN COO3W) * 
* Gail = REPLACEMENT COST (DEN BO55) * 
* C2 = REPAIR COST (DEN BO55A) * 
* D = GROSS SYSTEM DEMAND FORECAST - END OF LEAD TIME. * 
* (DEN BO23D) * 
* DBAR = QUARTERLY DEMAND FORECAST. (DEN B074) * 
* DLT = GROSS SYSTEM DEMAND DURING LEAD TIME. (DEN BO23C) * 
* DRTAT = RANDOM DEMAND DURING REPAIR PROBLEM TURN AROUND TIME. * 
# (DEN BO23H) * 
* DSCNTQ = DISCOUNT QUANTITY. A PARAMETER USED BY SPCC TO * 
¥ CONSTRAIN THE PROCUREMENT ORDER QUANTITY. (DEN BO061) * 
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Se a a a a a a 


+ 


+ 


ES a a 


+o cb Ft 


GLT 
GRTAT 


LAMBDA 
LOT 


MQTRSL 


NIIN 
NIMSC 
NRPR 
NSO 


PBP 


PVAR 


Q 
QW 


QR 
QREOQ 
QR1 
Ql 


RF 
RISK 


RLCONS 
RMAX 
RMIN 
ROP 
ROPBAS 
RRCT 
R2 


R2BAS 
SL 


MILITARY ESSENTIALITY. (DEN CO008C) 
GROSS SYSTEM RFI REGENERATIONS FORECAST - END OF LEAD 
TIME. (DEN B023F) 


SYSTEM RFI REGENERATIONS DURING LEAD TIME. (DEN B023E) 
RFI REGENERATIONS DURING PROCUREMENT PROBLEM AVERAGE 
TURN AROUND TIME. (DEN B023G) 
ANNUAL HOLDING COST FOR REPAIRABLES. 

(DEN V108 + .01 + DEN B057) 
VARIABLE USED AS A COUNTER FOR DO LOOPS. (NO DEN ) 
SHORTAGE COST ASSUMED WHEN A STOCKOUT OCCURS(DEN V104) 
LIFE OF TYPE. A CODE THAT TELLS US WHEN THE ITEM'S 
SPARES FOR IT'S LIFE CYCLE WERE BOUGHT IN A ONE TIME 
BUY. (DEN BO70 ) 
MAXIMUM NUMBER OF QUARTERS OF SAFETY STOCK.(NO DEN ) 
THE NUMBER OF ITEMS OR NIINS THAT REQUIRE LEVELS 
COMPUTATIONS. (NO DEN) 
NATIONAL ITEM IDENTIFICATION NUMBER CODE. (DEN DO46D) 
NONCONSUMABLE ITEM MATERIAL SUPPORT CODE. (DEN D125N) 
NUMBER OF POLICY RECEIVERS. THAT IS, THE NUMBER OF 


STOCK POINTS THAT WILL STOCK THIS ITEM. (DEN A003 ) 
NUMERIC STOCKING OBJECTIVE. SOMETIMES CALLED SYSTEM 
REORDER LEVEL LOW LIMIT QUANTITY. (DEN B020 ) 


PROBABILITY BREAK POINT. COMPARED TO THE PROCUREMENT 
PROBLEM VARIABLE (IE. AVERAGE LEAD TIME DEMAND) TO 
DETERMINE WHICH DISTRIBUTION TO USE WHEN CALCULATING 


THE REORDER POINT. (DEN V028 ) 
PROCUREMENT PROBLEM VARIANCE. (DEN B019A) 
CONSTRAINED PROCUREMENT ORDER QUANTITY. (DEN B021) 


UNCONSTRAINED PROCUREMENT ORDER QUANTITY. CALCULATED 
USING THE WILSON EOQ FORMULA ADJUSTED FOR 


REGENERATIONS. (NO DEN ) 
CONSTRAINED REPAIR QUANTITY. (DEN B021A) 
UNCONSTRAINED REPAIR QUANTITY. CALCULATED USING THE 
WILSON EOQ MODEL. (NO DEN ) 
BASIC REPAIR QUANTITY. CONSTRAINTS APPLIED TO QREOQ 
YIELD THIS VARIABLE. (NO DEN ) 
= BASIC PROCUREMENT ORDER QUANTITY. CONSTRAINTS APPLIED 

TO QW YIELD THIS VARIABLE. (NO DEN ) 
REQUISITION FREQUENCY. (DEN A023B) 
CONSTRAINED PROCUREMENT STOCKOUT RISK OR THE PROBABIL- 
ITY OF A STOCKOUT. (NO DEN ) 
REORDER LEVEL CONSTRAINT RATE. USED TO CONSTRIAN THE 
PROCUREMENT REORDER POINT. (DEN V295) 
MAXIMUM ALLOWABLE RISK. USED TO CONSTRAIN RISK. 

(DEN V102 ) 
MINIMUM ALLOWABLE RISK. USED TO CONSTRAIN RISK. 

(DEN V022 ) 
CONSTRIANED PROCUREMENT REORDER POINT OR LEVEL. 

(DEN BO19 ) 
UNCONSTRIANED PROCUREMENT REORDER POINT OR LEVEL. 

(NO DEN ) 
REPAIR REVIEW CYCLE TIME. (DEN V039 ) 
CONSTRAINED REPAIR LEVEL. (DEN BO19B) 
UNCONSTRIANED REPAIR LEVEL. (NO DEN) 
SHELF LIFE. A REAL VARIABLE THAT REPRESENTS THE SHELF 
LIFE IN QUARTERS. (NO DEN ) 
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a ee 


% be 


* SLC = SHELF LIFE CODE. A CHARACTER VARIABLE THAT MUST BE * 
* TO QUARTERE FOR USE IN OTHER PARTS OF THE PROGRAM. * 
* (DEN C028 ) * 
* Z = PROCUREMENT PROBLEM VARIABLE. THINK OF AS LEAD TIME * 
* ATTRITION DEMAND. (NO DEN ) * 
* a 
Sede deve dee de Fede Fe deve He ve Tove TeNe ve te Fe de Fete Tete PeTE TE Ne FEN Fede TC TET EDICT TERRI TR RIKI TRE RE REE RT 
* VARIABLE DECLARATIONS * 
RATNER TT TTR eFC TET TTT TICK KETENE TCT TER TET TET DENIED ETT TERETE TNT RTC Tete ete Ie 
* * 

INTEGER DSCNTQ( 12) ,1,LOTC 12) ,N,NRPR( 12) ,NSOC 12) ,QR1( 12) 

INTEGER PBP( 12) ,QC12),QR( 12) ,Q1(12) ,RLCONS( 12) ,ROP( 12) ,R2(12) 

REAL AC,AS1(12),A1,A2(12),C1(12),.02(12)59e 112), DBARGI 2) pidiG12) 

REAL DRTAT( 12) ,E(12),G(12),GLT( 12) ,GRTAT( 12) ,H, LAMBDA( 12) ,MQTRSL 

REAL PVAR(12) ,QW(12) ,QREOQ( 12) ,RF(12),RISK(12) 

REAL RMAX(12) ,RMIN( 12) ,ROPBAS( 12) ,RRCT,R2BAS(12),SL(12) ,2(12) 

CHARACTER*9 NIIN(12) 

CHARACTER*2 COG1(12) ,COG2(12) ,AUTHLV( 12) 

CHARACTER*1 SLC(12),AAC(12),NIMSC(12) 
* * 
Tededewe de ewe Tove ve ve Tese Weak Wee re Te Te Te Fede Vege Fe Te VeM Te WEF We Fe ETE He TEN TE Te I TEEN TEEN TET ITE TNT TT ITT TCT TIT ICT 
* * 
* INITIALIZE VARIABLES * 
* oc 
kivkivdkdedvaevetcakdcak ded vesetoket secs acskeac sek weeks iekickicsscdkevctckkk Kk ik KKK KKK 
* WE WILL ONLY COMPUTE THE DESIRED VALUES FOR 12 ITEMS * 
dededeiedededededeve de vests deve te seve seve te sete te deds te sete seve se Fever seve se Fe Fe Fe Fee Fee Fev Tete Fe Ve Fe Tee Fe Fe se Fee Tee Fete Fe He Ne He ve see 
Te * 

YS we 
* * 
kivkadesdecdkakdoaksedkek cteksiekkiicskdkskkkikicteicskicsdskskkskkikakksckkskkikikickak kkk 
* THE ANNUAL HOLDING COST FOR REPAIRABLES IS 21¢ PER DOLLAR HELD. * 
dededovedededevedede deseve devs ve deve deve ve deve ve deve ve veve seve ve se deve ve deve Te ve ve ve ve seve ve sete deve deve We seve ve sede He ve ve Fe ve ve Heese te dese vee 
ve v 

BS, Bil 


Pedevekedede deve dete Jose deve tev deve ede ve soso ve ve ke ve seve ve dee dese seve ven dove sede He ve ve deseo tee seve dene vesede He ve sexe vex Fever ese Heese 
* Al AND AC ARE PERIODICALLY CHANGED. CHECK WITH SPCC CODE 0412 AT % 


* A/V 430-4886 TO VERIFY THESE VALUES. * 
TeMede ede Tee Fede eB de Be Dedede BET PETE EET ETE CEE PEELED EERE BEDE AEDES ADDR EEERTREERAEREERERERE 
* * 
AC = 730.00 
Al = 1730.00 
ve v 


RRKARCARIERER ERR ERTRTIRRTERTRETRI RT EETTEETRERERREREREREEREREREREERERERERERERE 
* RRCT AND MQTRSL ARE PERIODICALLY CHANGED. CALL SPCC CODE 04211 AT * 


* A/V 430-4894 TO VERIFY THESE VALUES. * 
Doel rbkbte psicant te natioicoih rar DG cist end rac SIRE O SIR Sra Oca cise I OEE aT Gc eS Sie SS nn IEE EC IS 
* * 
RRCT = 0.0 
MQTRSL = 20.0 
% * 
Serededkeuedede sede acverevevece toute vee ck ak dete deve ak ak ak ak ve se ak ver ae ve veak souk ve se aesede seve de ae dese vere ak se vk sete ve se ve ve Tee dese ak ae we ae ae 
* READ IN THE SPCC DATA FOR THE N ITEMS ¥ 
PNT RT TITER TERETE TTT REIT TER BREE IRI AINA RANT IATR EER ERE EI 
Se we 
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DOORS 1 = iN 
READ(10, 1) COG1(1 ewe 2( 1), NIINC1),SLE@1),E(1),NRPR(1I),C1(1),D(1), 
DBAR(T) 
fl Ee CAM CAA Rano iemien leant 2) 1X. Fld. 670%, F 11. 8) 
READ( 10, 2) G(1),PVAR(1) ,RF(1) ,AS1(1) ,DRTAT(1) ,C2(1) 
PerenwAt (rig, 1X, Flcee lk 11.8, 1X F9.0,1X,F11.2,1X,F11. 2) 
READ( 10,3) A2(1),LOT(1I),NSO(1I),DSCNTQC( I) ,NIMSC(I),DLT(1),GLT(1) 
SPPORMAT (F900,1X,3(18,1xX) ,A,1X,F12.8,1X,F11. 2) 
READ( 10,4) GRTAT( I) ,AUTHLV(1) ,AAC(T) 
4& FORMAT (F11. 2,1X,A,1X,A) 
5 CONTINUE 
DO 20 I =1,N 
MRITE (6,6)COG1(1) ,COG2(1),NIINC1),SLC(1I),EC1I),NRPR(I),C1(1),DCI1), 
* DBAR( I) 
Cereal Gx OA) Ag X,A,1X,F4. 3, UX, 14, 1%,F11.2,1X,F11.8,1X,F11. 8) 
WRITE (6,7)G(1I),PVAR(I),RF(1I),AS1(1),DRTAT(I) ,C2(1) 
ere i Fi 8 1k F146. 8 1X Pll 801k. F9. 0,1%,F11.2,1X,F12. 2) 
WRITE (6,8)A2(I),LOT(1),NSO(1),DSCNTQ(I) ,NIMSC(I) ,DLT(I) ,GLT(1) 
8 FORMAT (1% ,F9.0,1X,3(18,1X),A,1X%,F12.8,1X,F11. 2) 
WRITE (6,9)GRTAT(1) ,AUTHLV(I) , AAC(T) 
9 FORMAT (1X,F11. 2,1X,A,1X,A) 
20 CONTINUE 
% * 
Resets Te seve Te ese Fe se Ne ee FET Tee TS Te Te ee Te BENE TE TE TE TE TE ETE TENE TEE TE TOG E TE BE TET E TE NCTE TENS FE TENE TENE IE TE TE TE Te Te ETE IE TENE NE BE TE IE IE TE IE IE 
* THIS IS A LOOP TO CALCULATE THE PROCUREMENT PROBLEM VARIABLE (Z) FOR * 


* N DATA ITEMS. SEE FD-DO1 P. O-41. * 
Reve dete sess Fe Te Ve Ve Te 8s Te ae Te Te Fe eee Tea Fe CTE NCTE TE TOT E NC TENE TS ETE TE IETS TONE TENE TN IE TE TE TE IETS VEE TE TE TE TE IE TS TE IE BE IE IE IE TE IE ETE IE IE TE IE IE 


ri ve 
DOOM e— aN 
ZCI) = DLT(I) - GLTCI) + Hee cag, 
CZ (Gl) rele O50) ZCI): = 
IF (Z(1). LE. 0.) PVAR(CI) = i 
Fe Fe Fe Te Ves Tee TCM CT Fe eas VEE VE TE TES TC TC TET TC TCA TE CTE TONE TE TS CTE TEE OTE TE VEE TE ETE TS TEN TVET TCE ETS RTT RR EKER 
* SPCC SPECIFIES ONLY ONE AAC, J, ON THE LEVELS PARAMETER CARD. IF * 
* THE ITEM'S AAC = J, SPCC WILL NOT STOCK THE ITEM. SEE FMSO PS-DO1DX * 
* MANUAL, P. K-7, PARA 30-A. * 
Seretedesevevess tere seve seve seve te se vevete ve ce veseveve veve Fe sete weve seve te vee sete ve severe Fete Te Fete Fe ve Te eve Tevet He Fe Fe sete Tevet Weve te seve 
IF (AAC(I).EQ.'J') PVAR(I) = 
10 CONTINUE 
ge ve 


Reaedetetetevedesovedetetesevetedekk vesevevese tose seve ve re weve see Tose ts He Fete sete dene vee ve Tete Fe Fete sete Fe eve Fe Fs Tes Te Tee te Tete He Nee Te eke 


* THIS IS THE DRIVER PORTION OF THE PROGRAM. MAJOR SUBROUTINES TO * 
* COMPUTE REORDER LEVEL, REORDER QUANTITY, REPAIR LEVEL, AND REPAIR * 
* QUANTITY ARE EXECUTED FRON HERE. 
Rate scis se sede sete ee tevs etek ve Rete ve Ke Te TN eI eT RIKKI RT TRICK NIKI KIT CT TCR 
te ve 


CALL COGVAL (COG1,COG2,N,NIIN,RMIN, RMAX, LAMBDA, PBP, RLCONS) 

CALL SHPLIF (SLC,N,SL) 

CALL WILEOQ (D,G,A1,AS1,H,C1,N, QW) 

CALL BASEOQ (D,G,DSCNTQ,N,QW,Q1) 

CALL RISKCP (C2,D,G,C1,DBAR,E, LAMBDA, RF ,H,RMIN, RMAX,N, RISK) 

CALL ROPUNC (Z,PVAR,RISK, PBP,N,ROPBAS) 

CALL ROPCON (ROPBAS,NRPR,SL,D,G,Z,DSCNTQ, LOT ,MQTRSL,N,NSO,RLCONS, 
* AAC ,ROP) 

CALL CONEOQ (LOT,D,G,SL,ROP,Z,N,AAC,01,Q) 

CALL RPQEOQ (AC,A2,D,G,H,C2,N,QREOQ) 
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CALL BASRPQ (RRCT,G,QREOQ,N,QR1) 
CALL REPQTY (QR1,N,SL,D,G,ROPBAS, Z, LOT, DRTAT,NIMSC , AUTHLV, QR) 
CALL BRPROP (QR,N,Z,DRTAT, ROP ,R2BAS) 
CALL REPROP (N,NRPR,D,SL,DRTAT, LOT,R2BAS,NSO,G,NIMSC, AUTHLV ,R2) 
DO 15 I = 1,N 
WRITE (6,12) Q(I),ROP(I) ,QR(I),R2(1) 
12. FORMAT (1%,'O= ',18,3X) ROP=' (16.3%, OR] “eo usk eee 5) 
15 CONTINUE 
END 
rid ve 
Kaede de dete dese de Hee HR eee MT ea Ne rede ese Nek ek sek Fe Ne MR TCI RIT RICCI TCHR KT IC 


* COGVAL SUBROUTINE * 
kiekkkkkikiccikikkkickikkkkikkkikistcKkkickccKicKkkek kK KK Rick kick Kh icv 


v3 DESCRIPTION we 
Hake kre Medes sede we KI He Fe HHH IA HAI TE He Ie MA AH MEM I TEA TE HRT II HI TIT Te eH Te TEE HIE TE ICT ITE ICI 
* 


* 
* THIS SUBROUTINE USES THE 4 DIGIT COG TO GET THE VALUES FOR THE = 
* MINIMUM ALLOWABLE RISK (RMIN), MAXIMUM ALLOWABLE RISK (RMAX), = 
* SHORTAGE COST (LAMBDA), PROBABILITY BREAK POINT (PBP), AND REORDER * 
* LEVEL CONSTRAINT (RLCONST). THE VALUES FOR RMIN, RMAX, LAMBDA, PBP, * 
* AND RLCONST CHANGE PERIODICALLY. CONTACT SPCC CODE 0412 AT A/V 430- * 
* 4886 TO VERIFY THAT THESE VALUES ARE CURRENT. THIS PROGRAM USES 7% 


* VALUES PUT OUT IN MARCH 1989 AND ARE CURRENT AS OF AUGUST 1989. x 
* a 
Sededededodede dete dedede deve Kee sede ede ede Te Fede He Te Fe Fe Te TCH TNC ATR EA KIRIN RERRERR I 
** VARIABLE DEFINITIONS * 
thavdescdedcacdek sesene seo ae aac ake sede se teacsevese teste secede de dese ese doses kaon Tete seks se eK I Kc Kk tect 
Ye Oy 
SUBROUTINE COGVAL (COG1,COG2,N,NIIN,RMIN, RMAX, LAMBDA, PBP,RLCONS) 
ve * 
Dedede de dete Keto He eWA He Fede dene KK ATK TI TIE ETRE TEENA NICK TENET RKTT ICN TCI NR IK KIT 
* VARIABLE DECLARATIONS * 
Sederedese deserve de veve seve de sede se sese te seve se seveve seve ve se seve ce severe veue ae ake se sksesle seek see ae ve seak ve ae ve seve ve dese ve se vedere seu ee 


Je whe 
7 7 


REAL RMIN(N) ,RMAX(N) , LAMBDACN) 
INTEGER I,N,PBP(N),RLCONS(N) 
CHARACTER*2 COG1(N),COG2(N) 
CHARACTER*9 NIIN(N) 


* * 
Jevevededetetedetededetededetedetesedete Fess eT TTR CTT EATER RTT TRI TRUER ERR TNT 
* * 


DO 10,51 =14N 
IF (COG1(I).EQ.'7G') THEN 
IF (COG2(1). EO. '4A'.OR,COG2(1). EO, SA. CR COG7(1), £0. 20: 


** . OR. COG2(1).EQ.'3D') THEN 

RMIN(I) = 0.15 

RMAX(I) = 0.40 

LAMBDA(I) = 1500. 

PBP(I) = Q 

RLCONS(I) = 

ELSEIF(COG2(I). G. "2A". OR. COG2(1). EQ. '1A'. OR. COG2(1). EQ. ' 0a" 

* OR. COG2(1).EO. 2D’ OR C0G201 sha. 1D OR, Coe2( 1)nb0, OD" 
*) THEN 

RMIN(I) = 0.15 

RMAX(1) = 0.40 

LAMBDA(I) = 1000. 
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* 


PBP(1) 
RLCONS(1) 


0 
1 


ELSEIF(COG2(1).EQ. '4B’. OR. COG2(1). EQ. '3B'. OR. COG2(1). EQ. ‘1B! 
OR. COG2( 1): ED: 'OB'. OR. COG2(1). EQ. '4E'. OR. COG2(1). EQ. '3E' 
. OR. COG2(I). EQ. '1E'. OR. COG2(1). EQ. 'OE') THEN 


RMIN(1) =O, 15 
RMAX(I) = (0). (Alb) 
LAMBDA(I) = 400. 
PBP(1) = : 
RLCGONS(I) = 
ELSEIF(COG2(1I). a '2B'. OR. COG2(1). EQ. '2E') THEN 
RMIN(I) — (0 IG 
RMAX(I) =s0e 0 
LAMBDA(I) = 200. 
PBP(I) =50 
RECONS(I) =1 
ELSEIF (COG2(1). EQ. '4C'. OR. COG2(1). EQ. '4F') THEN 
RMIN(I) = Oud 
RMAX(I) = 0050 
LAMBDA(I) = 600. 
PBP(I) = 0 
RLCONS(I) = i 
ELSEIF (COG2(1I).EQ.'1C'. OR. COG2(1). EQ. '0C') THEN 
RMIN(I) = Ons 
RMAX(I1) = 0.99 
LAMBDA(I) = 600. 
PBP(I1) = 920 
RLCONS(I) = 0 
ELSEIF (COG2(1I).EQ. '3C'. OR. COG2(I). EQ. '2C') THEN 
RMIN(I) = Oy 5 
RMAX(1) = 0.50 
LANBDA(1) = 250. 
PBP(I1) =0 
REGONS(I) = 1 
ELSEIF (COG2(1).EQ.'3F') THEN 
RMIN(I) =O 
RMAX(1) = 70950 
LAMBDA(I) = 400. 
PBP(1) =70 
RLCONS(I) = 1 
ELSEIF (COG2(1).EQ.'2F') THEN 
RMIN(I) = (0, Is 
RMAX( 1) =30 050 
LAMBDA(I) = 900. 
PBP(I) — 0) 
RLCONS(I) = 
ELSEIF (COG2(1I).EQ.'1F') THEN 
RMIN( I) = 05 
RMAX(I) = 0.99 
LAMBDA(I) = 900. 
PBP(I) =a 20) 
RLCONS(I) = 0 
ELSEIF (COG2(1I).EQ. 'OF') THEN 
RMIN(1) = 0-15 
RMAX(1) = 0.99 
LAMBDA(I) = 1200. 
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20 


* 


aS 


PBE(L) 

RLCONS(I) 
ELSE 

WRITE (6, 20) coG1(I), COG2(1) ,NIINCT) 


20 
0 


FORMAT (1X, ‘THE 4 DIGIT COG: ' ,1X,A2,A2,1X,'FOR NIIN: ' ,1k, 
A9,1X,'IS NOT DEFINED IN THE COGVALUE SUBROUTINE. ms 


ENDIF 
ELSEIF (COG1(1).EQ. '7H') THEN 


IF (COG2(1). EO. '4D'. OR GOG2(1). EO: "3D MORNGOG2( In EO, or 


. OR. COG2(1). EQ. '1D') THEN 


RMIN(I) = 0.15 
RMAX(1) = 0.40 
LAMBDA(I) = 1500. 
PBP(1) = : 
RLCONS(I) = 


ELSEIF(COG2(I1). al ‘4A’. OR. COG2(1). EQ. '3A'. OR. COG2(1). EQ. 


.OR. COG2(1). EQ. '1A'. OR. COG2(1). EQ. '0A') THEN 


RMIN(I) = 0.15 
RMAX(I) = 0.40 
LAMBDA(I) = 800. 
PBP(1) = 2 
RLCONS(I) = 


ELSEIF(COG2(1). 0, '4E'. OR. COG2(1). EQ. '3E'. OR. COG2(). EQ. 


_ OR. COG2(1). EQ. "IE". OR, COGZ0I eEO. OFM menEN 


RMIN(I) = 0.15 
RMAX(1) = 0.40 
LAMBDA(I) = 200. 
PBP( I) = 0 
RLCONS(I) = 1 


ELSEIF(COG2(1). EQ. '4B'. OR. COG2(1). EQ. '3B'. OR. COG2(1). EQ. 


. OR. COG2(1). EQ. 'OB') THEN 


RMIN(I) ="6. 15 
RMAX(I) = 0440 
AMBDA(I) = 400. 
PBP(1) = : 
RECONSCI a= 
ELSEIF(COG2(I). at "4F'. OR. COG2(1). EQ. '3F'. OR. COG2(1). EQ. 
THEN 
RMIN(I) = 0. 15 
RMAX(1) = "0550 
LAMBDA(I) = 500. 
PBP(1) = g 
RECONS(I > = 
ELSEIF(COG2(1). cat "3C"..0OR. COG2(1). EO. 2C sm SHEN 
RMIN(I) ="0, 15 
RMAX(1) ="050 
LAMBDA(I) = 400. 
PBP(I) = : 
RECONS( 1) “= 
ELSEIF (COG2(I). SPR Grocers ae we") THEN 
RMINCI) =O oS 
RMAX( I) = 0.99 
LAMBDA(I) = 700. 
PBP(I) = ze 
RECONS( 1) = 


ELSEIF (COG2(I). a '1B') THEN 


a2 


"oa! 


ae 


oy 


U oye 


RMIN(I) = 0.15 
RMAX(I) = 0.40 
LAMBDA(I) = 725. 
PBP(I) = 0 
RECONS( 1) = 1 
ELSEIF (COG2(1).EQ.'N1') THEN 
RMIN(I) = 0.15 
RMAX(I) =, 0.40 
LAMBDA(I) = 1200. 
PBP(1) = 0 
RLCONS(I) = 1 
ELSEIF (COG2(1).EQ.'S1') THEN 
RMIN(I) = 0.15 
RMAX(1) = 0.50 
LAMBDA(I) = 1200. 
PBP(I) =o) 
RLCONS(I) = 1 
ELSEIF (COG2(1I).EQ.'4C') THEN 
RMIN(1) = 0.15 
RMAX(1) = 0.50 
LAMBDA(I) *="700. 
PBP(I) =0 
RLCONS(I) = 1 
ELSEIF (COG2(1).EQ.'1F') THEN 
RMIN(I) = 0.15 
RMAX(I) = 0.99 
LAMBDACI) = 100. 
PRP(1) = 20 
RLCONS(I) = 0 
ELSEIF (COG2(I).EQ. 'OF') THEN 
RMIN(T) = 0.15 
RMAX(I) = 0.99 
LAMBDA(I) = 500. 
PBP(1) = 20 
RLCGmCl) = 1 
ELSE 
WRITE (6,25) COG1(I),COG2(1),NIIN(I) 
25 PORMAT (1X, THE 4 DIGIT COG. .1%,A2 A220 ,' FOR NIIN:' ,1X, 
* A9,1X,'IS NOT DEFINED IN THE COGVALUE SUBROUTINE. ') 
ENDIF 


ELSEIF (COG1(1).EQ.'7E') THEN 
ec coG2( 1). £0. "4A..OR GeG2(1). £0. "3A". OR€0G2(1).E0, 14D" 


* . OR. COG2(I). EQ. '3D') THEN 

RMIN(I) — oes 

RMAX(1) = eG0 

LAMBDA(I) = 1500. 

PBP(1) = ‘ 

RLCONS(I) = 

ELSEIF(COG2(I). a ‘2A OR, GOGZGI- EO. IA SOR) COG2(1). EQ. '0A' 

* MOR. COG2(1). EQ. 2D’. OR. COG2(1). EQ. ' 1D". OR. COG2(1). EQ. 'OD' 
*) THEN 

RMIN(I) =o 5 

RMAX(I) = 0.40 

LAMBDA(I) = 1000. 

PBP(I) = 6 

RLCONS(I) =1 
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we 


*) 


*) 


ELSEIF(COG2(1). EQ. '4B'. OR. COG2(1). EQ. '3B'. OR. COG2(1). EQ. '1B' 
. OR. COG2(1). EQ. 'OB'. OR. COG2(1). EQ. '4E'. OR. COG2(1). EQ. '3E' 
. OR. COG2(1). EQ. '1E'. OR. COG2(1). EQ. 'OE'. OR. COG2(1). EQ. '4M' 


THEN 
RMIN(I) =80) 15 
RMAX(T) =50. 40 
LAMBDA(I) = 400. 
PBP(I) = : 
RLCONS(I) = 
ELSEIF(COG2(I). ml "oM'. OR. COG2(1). EQ. '1M'. OR. COG2(1). EQ. 'OM' 
THEN 
RMIN(I) = 0215 
RMAX( 1) = 0940 
LAMBDA(I) = 600. 
PBP(I) = : 
RLCONS(I) = 
ELSEIF(COG2(I). i, "2B'. OR. COG2(1). EQ. '2E') THEN 
RMIN(I) =O 
RMAX(I) = 8), 20 
LAMBDA(I) = 200. 
PBP(I) = : 
RLCONS(I) = 
ELSEIF(COG2(I). sin 'AC',. OR. COG2(1) PEO. '4F")) THEN 
RMIN(1I) = Ons 
RMAX(1) = 0750 
LAMBDA(I) = 600. 
PBP(I) ==) 
REGONS(I) = 1 
ELSEIF (COG2(I).EQ. '3C'. OR. COG2(1I).EQ.'2C') THEN 
RMIN(I) = 015 
RMAX(I) =-0.050 
LAMBDA(I) = 250. 
PBP(L) =a) 
RLCONS(I) = 
ELSEIF (COG2(I). EQ. '1C'. OR.COG2(1).EQ. '0C') THEN 
RMIN(I) = 01s 
RMAX(1) = 0.99 
LAMBDA(I) = 600. 
PBP(L) = 120 
RECONS( 1) “= 0 
ELSEIF (COG2(1I).EQ.'3M') THEN 
RMIN(I) = 6. 15 
RMAX(1) = 0246 
LAMBDA(I) = 100. 
PBP(I) =a) 
RLCONS(I) = 1 
ELSEIF (COG2(1I).EQ. '3F') THEN 
RMIN(I) = 70-15 
RMAX(1) = 0.50 
LAMBDA(I) = 400. 
PBP(I) = 0) 
RLCONS(I) = 1 
ELSEIF (COG2(1I).EQ.'2F') THEN 
RMIN(I) = 0), 15 
RMAX(1) = 050 
LAMBDA(I) = 900. 
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PBP(I) =0 
RLCONS(I) = 1 
ELSEIF (COG2(I).EQ.'1F') THEN 
RMIN(I) = 0.15 
RMAX(I) = 0.99 
LAMBDA(I) = 900. 
PBP(I) = a 
RLCONS(I) = 
ELSEIF (COG2(1). Bo) ane THEN 
RMIN(I) = (0015 
RMAX(I) = 0.99 
LAMBDA(I) = 1200. 
PBP(I) = 20 
RLCONS(I) = 0 
ELSE 
WRITE (6,30) COG1(I) ,COG2(I) ,NIIN(1) 
30 FORMAT (1X,'THE 4 DIGIT COG: ',1X,42,A42,1X,'FOR NIIN: ',1X, 
* A9,1X,'IS NOT DEFINED IN THE COGVALUE SUBROUTINE. ') 
ENDIF 


ELSEIF (COG1(1).EQ. '6A') THEN 
feecoce( IT). EO. Cl’. OR. COG201). 50, C2¢g0R-c062(1). EQ. C3" 
*) THEN 


RMIN(I) =a ail 
RMAX(1) = 0.35 
LAMBDA(I) = 6000. 
PBP(I) = 0 
RECONECI) = 2 
ELSEIF(COG2(1). EQ. 'R1'. OR. COG2(1). EQ. 'R2'. OR. COG2(1I). EQ. 'R3' 
¥) THEN 
RMIN(I) = O(n 
RMAX(I) =F0es5 
LAMBDA(I) = 50. 
PBP(I) = 06 
RLCONS(I) = 1 
ELSE 
WRITE (6,35) COG1(1),COG2(1),NIIN(I) 
35 FORMAT (1X,'THE 4 DIGIT COG: .1X,A2,A2,1x, ‘FOR NIIN: ',1X, 
* A9,1X,'IS NOT DEFINED IN THE COGVALUE SUBROUTINE. ') 
ENDIF 


ELSEIF (COG1(1).EQ. '6H') THEN 
emecoe (1). £0. Cl ORaceG2( 1). EO, e2 OR. COG201). £0.'Cc3' 
*) THEN 


RMINC I) = 0.01 
RMAX( I) = 0.35 
LAMBDA(I) = 6000. 
PBP(1) = 
RLCONS(I) = 


PESEIF@GOG201): sal MR. OR GOG2( 1jeEO. R2 / OR. COG2(1). EQ. 'R3' 
*) THEN 


RMIN(I) = 0.01 

RMAX(I) = 0.35 

LAMBDA(I) = 50. 

PBP(I) = 0 

RLCONS(I) = 1 
ELSE 


WRITE (6,40) COG1(I),COG2(1I) ,NIIN(I) 


40 
* 


45 
* 


FORMAT (1X,' THE 4 DIGIT COG: 


AShaix 


ENDIF 


1 
ELSEIF (COG2(I). EQ. 'R2'. OR. COG2(1). EQ. 'R3') THEN 


ELSEIF (COG1(1).EQ. '6X') THEN 

IF (€062(1).£0, 
THEN 
RMIN(I) = 0.01 
RMAX(I) = 0.35 
LAMBDA(I) = 2500. 
PBP(I) = : 
RLCONS(I) = 

ELSEIF(COG2(1). ae 'R1') THEN 
RMIN(I) = 0.01 
RMAX(I) = 0.35 
LAMBDA(I) = 100. 
PBP(I) = 0 
RLCONS(I) = 
RMIN(I) = 0.01 
RMAX(I) = 0.35 
LAMBDA(I) = 50. 
PBP(1) = 0 
RLCONS(I) = 1 
ELSE 


WRITE (6,45: 


A9,1X, 


ENDIF 


ELSEIF (COG1(I). 


RMIN(TI) 
RMAX(I) 
LAMBDA( I) 
PBP(I) 
RLCONS(I) 


ELSEIF (COG1(I). 


RMIN(I) 
RMAX(T) 
LAMBDA(1) 
PBP(1) 
RLCONS(I) 


ELSEIF (COG1(I). 


RMIN(I) 
RMAX(T) 
LAMBDA(I) 
PBP(I) 
RLCONS(I) 


ELSEIF (COG1(I). 


RMIN(T) 
RMAX(I) 
LAMBDA(I) 
PBP(I) 
RLCONS(1) 


ELSEIF (COG1(I). 


RMIN(I) 
RMAX(1) 
LAMBDA(I) 


EQ: 


E 


E 


15,2] 


(52 | 


rnbhnrornrnrnrtrornrtnhtonrintitortitiue 


‘C1’. OR. COG2( 1), BO. C2 -ORMGGG2(7 EO) C3” 


COG1(I) ,cOG2(T) 
FORMAT (1X,'THE 4 DIGIT COG: 


'7Z') THEN 


6B') THEN 
0.01 

0.40 

100. 

8 

0 

'6D') THEN 
0.01 

0. 40 

100. 

C 

1 

'6L') THEN 
0.01 

0.50 

400. 

20 

0 

'6M') THEN 
0.01 

0. 40 

50. 
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»1X,A2,A2,1X,'FOR NIIN: 
IS NOT DEFINED IN THE COGVALUE SUBROUTINE. 


, UX, A2.,42,1%. FOR NIIN: 
"IS NOT DEFINED IN THE COGVALUE SUBROUTINE. 


m 


" 


PBP(I) = 20 
RLCONS(I) = 0 
ELSEIF (COG1(1).EQ.'6N') THEN 
RMINCI) = 0.01 
RMAXC1) = 0.35 
LAMBDACI) = 100. 
PBPC1) = 0 
RLCONS(I) = 1 
ELSEIF (COG1(1I).EQ.'8A') THEN 
RMINCI) = 0.01 
RMAX( 1) = 0.99 
LAMBDAC(I) = 0.03 
Bele) = 20 
RLCONS(I) = 0 
ELSE 
WRITE (6,50) COG1(I) ,COG2(1) ,NIIN(I) 
50 FORMAT (1X, THE & DIGIN COG: ,1X,A2,A2,1X,'FOR NIIN: ', 1X, 
* A9,1X,'IS NOT DEFINED IN THE COGVALUE SUBROUTINE. ') 
ENDIF 
10 CONTINUE 
RETURN 
END 
* * 
PPT TS Te Ft VTC Te Tee Te Te He eH Te TET NE EIEN TCE ENE TCI TIER IER TERT IER EIR ETRE RRR ERIE 
* SHFLIF SUBROUTINE * 
Medekevedesete sete te te Wee Te Ke Fe Te He Te Te Te TEN Ne Vee Ne Tess Be Te Te Te Te Ve Fe Te Ke MTC HT Te Ke PETC TE Ne ERE TER EKER ETN TEIN TNR IERINE 
* DESCRIPTION * 
ee hoch intel RI Ae LY ALIA ISI al eal fl lie eta alee ect ere ba dey epson galerie legit refs chs cl nc Se aoe Oe CRIS rats 
* * 
* THIS SUBROUTINE CONVERTS THE SHELF LIFE CODE (SLC) (DEN C028) INTO * 
* QUARTERS (SL). THE SHELF LIFE IN QUARTERS IS THEN USED WHEN * 
* COMPUTING THE CONSTRAINED ORDER QUANTITY, CONSTRAINED REORDER LEVEL, * 
* CONSTRAINED REPAIR QUANTITY, AND THE CONSTRAINED REPAIR LEVEL. * 
* v 
Dedede vedede te vededs Jets ve te ce sets cove ete ese Fe Fe Nets se TS Te Se VET TE TERE Te Ne Fe ET CTT CTE TTT RTE Tose TCT FETE TCS ET TENET ETT IE 
* VARIABLE DEFINITIONS * 
TRV ese ts He Fe Te Te Te Ts Tes TENCE TE TE TCT TCT ICTS PETE TE CREE TC TENE TE DRE TCT TCT TC TEV TNT ICTR EERE REE IECER 
Te * 
* SLC = SHELF LIFE CODE. A CHARACTER VARIABLE THAT MUST BE CONVERTED * 
* TO QUARTERS FOR USE IN OTHER PARTS OF THE PROGRAM. as 
* SL = SHELF LIFE. A REAL VARIABLE THAT REPRESENTS THE SHELF LIFE IN * 
* QUARTERS. wB 
Heesesese dese seaksese eset ee RH seve testes ek He He deve tok Fesesewe see Keak Fee reek sedek Hse Teese Ke ete te deve dete Fewe He Me WRK IN 
* de 
SUBROUTINE SHFLIF (SLC,N,SL) 
Peete Tete vede we de Poca te codecs te tede He Fe Peseta ve dese oe Pete Pe cede Se ede Bee ete Sete TKS EI TI CITE ETAL TORE ICT RE 
* VARIABLE DECLARATIONS * 
Tete de dete te Hee te Te ceded fete ve dete de fete Tere te tee de seds Toke Tots eee TES REE RRA RAE RRA REE EICETE 
* iS 
CHARACTER*1 SLC(N) 
REAL SL(N) 
INTEGER N 
* * 


Pe Tete de teks tote Fe Tete Bete tebe Bete Le ERATE EEE TERE RRR ERR ERERERTREERERTEREETEREREERE 
oe 


* IF THE ITEM HAS NO SHELF LIFE, MAKE SL VERY LARGE SO THAT IT PLAYS’ * 
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* NO PART IN DETERMINING CONSTRAINED QUANTITIES OR REORDER LEVELS. * 


ve * 
dededevededededevededede ledevede ese te sese ve deve seve deve desk deve seve doves dese ve deve ve seveve deve ve dese Heese ve ve tote dose Heese tesevesese seve seve 
* te 


DO 10 I =1,N 
! 
IF (SLO(1). £0. 0) THEN 
S(O) = Ves). 
Rercdekedede tee de Tete Tele ETI TR te Ke Tete HVT TCE TE HT Pet TCT TEREST ICT ICN, TPCT TIT TANKER RI 


* * 
* OTHERWISE, ASSIGN THE SL AS APPROPRIATE. * 
oe te 


deterededese dese te dese dea deve seve ds He te se Je se Ne dese He deve Fe Fe He Ve ToT He Tete Ve se We He Fe Ne Fe Ne Fee He Fe ve He Fe We He Fe se se Fe eG Te Ne Fe see He Fe ve Fee 
ELSEIF (SLC(1).EQ.'A'’) THEN 
SL(I) = 1./3. 
ELSEIF (SLC(I).EQ.'B') THEN 
SL(I) = 2./3. 
ELSEIF (SLC(I).EQ. 'C'. OR. SLC(I).EQ.'1') THEN 
SG) y— ale 
ELSEIF (SLC(1I).EQ.'D') THEN 
SL(I) = 4. /3. 
ELSEIF (SLC(1)-£0Q."E )) THEN 
SLC(I) = 5. /3. 
ELSEIF (SLG@L)eEO. 'F’.OR. SLC(1). EO. 2) THEN 


Sly = 2 

ELSEIF (SLC(1). EQ. 'G’. OR.SLG(1). EO. 4 )) THEN 
SL(1) = 3. 

ELSEIF (SLC(1).EQ. 'H’. OR. SLC(I).EQ.'4') THEN 
SL(I) = 4. 

ELSEI ES (SEC( 1), EO. i) )euHEN 
SH) = 5, 

ELSEIF (SLC(1). EQ. 'K’. OR. SLC(1). EO. '5') THEN 
SL(I) = 6. 

ELSEIF (SLC(I).EQ.'L') THEN 
SL(I) = 7. 

ELSEIF (SLO(1)-EO. MM {ORSSIC(1)* On 6) jy THEN 
Sn) =o 

ELSEIF (SLC(1). EQ. 'N’) THEN 
SL(I) = 9. 

ELSEIF CSLG(1). £0. Pe THEN 
SL(I) = 10. 

ELSEIF (SLC(1).EQ. 'Q'.OR. SLC(I).EQ.'7') THEN 
SL(I) = 12. 

ELSEIF (SLE(1). EO: R°SORTSLO(I)) EO. 6 > CHEN 
SL(I) = 16. 

ELSEIF (SLC(1).£0. 'S’.OR.SLO@). BO) 9") THEN 
Sil a= 20. 

* * 


Sedededesevedeve deve vedevevedetedevetede te tevede sede cetec sede Nese Teese ses ee ee SCI OT ERLE RT RR 
* 
* IF THE ITEM HAS SHELF LIFE CODE K (SL > 60 MONTHS), MAKE SL 7 YEARS. * 


* MY EXPERIENCE WITH MOST OF THESE ITEMS IS THAT THE SHELF LIFE IS * 
* ABOUT 7 YEARS. “ 
¥ * 
Tededededededevedede Sede ce veda te sede Fecede te Bede De Pee BoC ICT TERE TOR TETRA SEAEEER EBERLE REELED EERIE 
* * 


ELSEIF @SiC(1)- £0. 'X’ ) THEN 
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SL(I) = 84. 


se * 
dete deveds deve ve Hess tev deve Tete ve ve deve ve devote sede ae teve de de sevede dese deveve deve Te sevede Fevede verre sewed sewer Tee deeded 
* we 
* IF THE ITEM HAS AN UNDEFINED SHELF LIFE CODE, ASSUME IT IS GARBAGE * 
%* AND MAKE THE SL SO LARGE THAT IT WILL PLAY NO PART IN DETERMINING THE* 
* CONSTRAINED REORDER QUANTITIES OR CONSTRAINED REORDER LEVELS. * 
* ¥ 
WIKI KR aK KR RAKE ARR 
* * 
Ja uisye 
SL(I) = 9999. 
ENDIF 
10 CONTINUE 

RETURN 

END 
* che 
detedededevevere teve te se de ser ve He se se Fe He ve ve ve ve Te ve Fe tee sete Veve de ve seve deve Fe ese seve aleve eae ae We sea ve ve ve ve ak ve seve ve se ak ve dese veveve vege 
* WILEOQ SUBROUTINE * 
Setedete Fetevs He ve se Fess sete ve seve ve se Te seve Fe Fe Tew Fe Ie Te ee Te Fe Tee Te TCT ERIC TS TOT TENT FETT FETT TE TET TCT TC eK TC eT 
* DESCRIPTION * 
Sete sete de Tete ve He Sele He seve Fe sere Fee Te We Fe Fe Ie Te Tee eT NE ETT Fe ETE Te ETE Te TET eT eT Te TENET Tee Tete Te Pe Te Hee ee eI eI 
de ve 
%* THIS SUBROUTINE COMPUTES THE WILSON EOQ PROCUREMENT QUANTITY MODIFIED* 
* FOR REGENERATIONS (NO DEN). SEE FD-DO1 P. 0-23. x 
* % 
PATA TK ete RICK He eH I ee ese Ke deve ted Tete etek Fete Fede dete Te tose Fede Fe Pete Ke TFT II ATE AKT KKK 
* VARIABLE DEFINITIONS * 
tevedededecesevedesetesevede seveve ve sete sesete seve ce se sete Neve te Fe seve He Te Fee Fe ese Fete Nese He Fe Fe Te Fe TK Te eM NH He ese Te ese ve seve eae ge 
rs ac 
FeteFededevede te ve Tete Fetes Te Fee Fe Tete He Fe Fe Fe Ve Fe T6 Tete Me TCT TeV TC FEN TET VETTE TCT Te TON Te eFC Ne VEN TH Tee ERIE IERIE RIK ICN 
vw ws 

SUBROUTINE WILEOQ(D,G,A1,AS1,H,C1,N,QW) 
es * 
Sede devesevedede ve seve ve ve sede veve Fe severe seve ne seve ve ese se seve ls ve vee ses te seer ve vetk seve seve se esse seaeve se sees seve we se se ae weve Heese ve 
* VARIABLE DECLARATIONS % 
FeteTede Te RR ete Fe eM ee Te Fete Tee Fe V8 Fo FEAT TC TS TOT TENE TC TCT NETS Te DETTE TEETER TC TTC TEEN ICN TET TR TON TEN ICN A CT He 
whe al. 


REAL D(N) ,G(N),A1,AS1(N) ,H,C1(N) , QW(N) 
INTEGER 1,N 


vc * 
DPR Sete eR IRE TCU TREE TTR TER TTT TRE RERERTRETRERIERUER RETREAT 
* % 


Do10.1 =%1,% 
Omeipe SORT (8. *(D(1) = G(1)) * (Al + &S1(1))) / CH * C1(1))) 
10 CONTINUE 


RETURN 

END 
we te 
tketkddcitekhackiKkkeaiKckKemKchKKKKckiKcickhKaKkachRKRKKaaR aaa 
* BASEOQ SUBROUTINE * 
detetedelsvevede fe ctevede rete fe vecete fete teehee Rete LT TST Fe ETRE RRA TEPER 
* DESCRIPTION * 
RR RRR RRR RC RRL RRTRE ERTL RARER ERECT 
hs * 


* THIS SUBROUTINE COMPUTES THE BASIC PROCUREMENT ORDER QUANTITY(NO DEN)* 


SE) 


* SEE FD-D01l PF. O-26° * 


* * 
Tedetedeede ase dkede tedden Hester tote He Fes re dete ye sede Ke sete seu Kete de ese te te te Fete ye se sete Tete Me seve ese Te He se eve ese ee ese rese ye see 
* VARIABLE DEFINITIONS * 


Ferederererere tere teve ve te Nese Neve Fete Tete reve rere Ve ve ve eve Fe ve Fe Mee Tove Deve se eye Fe se se ye seve Te teste Fes ve seve ve seme ve seve He se se ee re se ese se 


* * 
* ALL VARIABLES ARE AS DEFINED BEFORE EXCEPT FOR: * 
* Q2 = ATTRITION DEMAND * DISCOUNT QUANTITY * 
* Q3 = MAXIMUN OF Q2 AND THE WILSON EOQ VALUE (QW). * 
* Q4 = 12 QUARTERS OR 3 YEARS OF ATTRITION DEMAND. * 
% * 
PeveTePe Fede VeTe Tee TRI TCT RTE TEE Ke FNC Te VEN Te PRTC LER CTT Fe RIC TET ET RICE RT RR IKEA KERRI RRR I 
a oe 
SUBROUTINE BASEOQ(D,G,DSCNTQ,N,QW,Q1) 
* * 
Fetereketedekesedete dete de Hed Te THI He te Ke Fete Fete Kee eH Te Tes Te Kee Tete Kee Heke te Heese Kate Kk tese se sete ec tek Keke tekst kis 
* VARIABLE DECLARATIONS * 
Fervevereverevedevetedeve seve ve se deserve sods Te te deve se te Tose te Fe Fee seve He Neve Fe tess te tere se vede eve tesese seve seve te ve ve ve te Fe ve dete Fekete ve tee Fe 
* * 
REAL D(N),G(N) ,QW(N) ,Q2,Q3,Q4 
INTEGER I,N,DSCNTQ(N) ,Qi(N) 
ae * 
Teredeteve dover eve He deve Fede TeTe TEN Tea Te Fe Te Te Ne Fee Ve Te Te Te Te TT TOR ICT TENE Me TCT KE FORTINET FT CTC TE TC TOR TTT TCT CR TICK TTI 
* * 
DO 108 team 
IF (DSCNTQ(I). EQ. 0) DSCNTO(1) = 
IF (D(1). LESG(1)) THEN 
Qi(I) = 1 
ELSE 
Q2 = DSCNTQ(I) * (DCI) - GCI)) 
Q3 = AMAX1(QW( 1) ,Q2) 
Q4 = 12. * (D(I) - G(I)) 
Q4 = AMIN1(Q3,Q4) 
Qic1I) = IFIX (Q4 + .999) 
ENDIF 
10 CONTINUE 
RETURN 
END 
* * 
dededededededs tesede Tevet se setecede Ke ve de Bede de Fe dete Fede de Sede Pode dese de de Be Pe Be Pe REET TTD EEE RAR BER ERR RTE RRET. 
* RISKCP SUBROUTINE * 
Si in Spe are a ae ar ln ete ana eae Cae area sin cine wa cae Se cee a wae Cae aes a oe ir aa 
* DESCRIPTION * 
CAO GRC n ak ic ick boi ico bib ok Gr acco Oia Gc ica Ok kc lar oc tieoc aria ei soi Ack ok (ac OO Or Rk IC HICe GEA acco ciated 
* * 
* THIS SUBROUTINE COMPUTES THE PROCUREMENT STOCKOUT RISK FOR THE 


ss 


« INTEGRATED REPAIRAELES MODEL. SEE FD-DO1 PP.0-26 THRU 0-27 (NO DEN). * 
* 


we 
Sevevevevededevevedeveveveseuede deve de vese ds Fede devede vere Teste Tove Tesco ewes Tere Te Tee ee eve se Te Tee Te Te eve Tee Te eT eT Ne Fev ete Hee TE Te 
vs 

SUBROUTINE RISKCP (C2,D,G,C1,DBAR,E, LAMBDA, RF,H,RMIN, RMAX,N, RISK) 
we 


Feteverede sede devede fevevevede Tove ve seve Fe sete deve Tete Fete Te vede Fe seve severe Te Te Te Te Tete Fe Te Te eI Fe CTE Te eM Teese Te Teves TeV e Fe Te NE Fe 


* VARIABLE DEFINITIONS * 
Tetedevede Teve Fe seve Te TeNe Te ve Te HVT Te RENT TET RTC TTR TT TTT TDN CTC ETT ARETE TREE TERE REET RRRER RET 
ale PS 
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* ALL VARIABLES ARE AS DEFINED BEFORE EXCEPT FOR: * 
* C3 = THE INTEGRATED COST USED IN THE RISK EQUATION. IT IS A * 
* WEIGHTED COST WITH TWO ELEMENTS: REPAIR COST (C2) AND * 
* PROCUREMENT COST (C1). * 
%* TRISK = RISK VALUE FOR THE INTEGRATED DLR MODEL. * 
* VRISK = VARIABLE PROCUREMENT STOCKOUT RISK. * 
* ARISK = ACCEPTABLE PROCUREMENT STOCKOUT RISK. * 
* * 
MIRTH KT AW He TI He Mets He IN A Tee He Te Ke NIH Te Nese IRR KR IIE RAK RRR IIT KIRK KIKEN 
VARIABLE DECLARATIONS * 
Fetetedestede te HK sew se tere Kee He Ne tea Heese Tete He He He He Nese Fede Kee seve He sede Ves tee Ne sete Hee tere reve RAT eK Kester seK we KKK 
* * 

REAL C2(N),D(N),G(N),C1(N),DBAR(N) ,E(N) , LAMBDA(N) ,RF(N) ,RMIN(N), 

%* RMAX(N),RISK(N) ,C3,H, VRISK, TRISK, ARISK 

INTEGER N,I 

* * 
Pere tereserere We te te sets ve Fete te Wee Ne He Ie He eM Fe Ne eH Ne eee Fee I Te ETE Te Te Te Te Te Ne TCT Fe Me eT EE TC Te TET TOIT E FE IE Te eM IE eI 
bid we 

DO 10 I = 1,N 
* * 


dere dededevs teste ve te eve se teve ve tere souk Teste te ve te seve ye Fe eve se Te se Fe Te Fe Fee Ie eT TET Te TE ITE TET TET CTE TET IE OT Te 
* THIS PORTION IS ON P. 0-26. IT IS THE VARIABLE PROCUREMENT STOCKOUT * 


% RISK. % 
VRE Tete Te eT ATER EEE RNC REET REEEREE ETRE REREREEEREERIEREREREREERR TS 
we * 

IF (GC1I).GT.D(I)) GCI) = D(1) 

IF (DBAR(I). EQ. 0.) DBAR(I) = 1. 

PEeGRECI)VEO.0.) RECL) = 1. 

IOS (eC IDs HO Wa ). ECI) = 0.5 


C3 = C2(T)*(G(T)/D(T)) + C1(1)*(1-(GC1)/D(1))) 

TRISK = (H*C3*DBAR(I)) / (RF(1)*LAMBDA(T)*E(T)) 

VRISK = AMINI(999999. , TRISK) 
ve * 
dededededets Hedede ve te tote tote tote te Sets vote tote re sete te Pete Tove ts Te ee Ee Pete eee CeCe EE TE TE Ee PETE TE LENE PERE LENE DENEVE ETERS TIER T TOGE 


%* THIS PORTION IS ON P. 0-27. IT IS THE ACCEPTABLE PROCUREMENT STOCKOUT 
* RISK. * 
Pedevevesede te dete see se se seve WTS Te Te TET Be IE TS ICI TET E IOTE TE TE TET CTE TE TE IE TE TENE TE TOUTE IC VE NE WENT TED TE WBE VE TE VE IE IE IEE NE BEE WE ICV WIE TE 
* THIS CHECK WAS NOT IN ANY PROGRAM FUNCTIONAL OR DETAIL SPECFICATION, * 
* BUT WAS IN FMSO'S LEVELS PROGRAM. LOOK AT THE FORTRAN SECTION OF THE* 
* PROGRAM LINE 1650. * 


Secedevededesesesede de seve cede ve seve sesee te te Fee TeNe Tecate Foe Tet Ne Se Te TIT TET ER ITER ICTR ITT ICT IER FERENCE I 


* * 
IF (DC1). LE..0. ) THEN 
ARISK = 0.0 
ELSE 
ARISK = VRISK / (VRISK + 1.) 
ENDIF 
ve ve 
pidicininieieie ein citi e eee cite Riek ieee OO ei OR oe ee Oe ee ee ee 
ee * 
RISK(I) = AMAX1(ARISK,RMIN(I)) 
RISK(I) = AMINICRISK(1),RMAX(1)) 
10 CONTINUE 
RETURN 
END 
bis a 
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Tedede Tete de Fe deve HFT Tee KR IT I TTT TET TCH TRIER RRR CA CTE TCHR ARK TN TT HTH HIT 


* ROPUNC SUBROUTINE * 
dededededededededetedetedededededek sere tere dete de dete te deve dete de ded de tetete dese ie sede tected seve Nese sete Wesete sese ese Ke veseweses se ses 
* DESCRIPTION * 
Sedededededevedevede dete dededeve dete Fe vevete seve He ve ve Fe Te We ve Fe ve ese Fe Ne Te Fe Fe Fe Te Fe see Fete Nese Fe He Fe Fe Fe VEN Tee Te He Tes Fe Fev Hesese te Wee He 
ve * 
* SUBROUTINE TO FIND THE UNCONSTRAINED REORDER POINT (ROPBASIC). WE * 
* COMPARE THE PROCUREMENT PROBLEM VARIABLE (Z) WITH AN ICP SPECIFIED * 
%* PROBABILITY BREAK POINT (PBP OR PB) TO DECIDE IF WE WILL USE THE * 


** NORMAL DISTRIBUTION OR THE NEGATIVE BINOMIAL DISTRIBUTION TO COMPUTE * 
v THE ROPBASIC. IF Z >= BP, WE USE THE NORMAL DISTRIBUTION. IF Z < BPp* 


* WE USE THE NEGATIVE BINOMIAL DISTRIBUTION. I USE AN IMSL FUNCTION, * 
%* ANORIN, TO RETURN THE NORMAL(0,1) VALUE (ZVALUE) AND THE SUBROUTINE, * 
%* NEGBINOM, TO CALCULATE THE ROPBASIC USING THE NEGATIVE BINOMIAL * 
* DISTRIBUTION. * 
ve * 
HRI REAR ERE EEE ER ERIN ER ERK AREER ER ERE EERE RE EEE REAR R ERE EE EERE ER 
* VARIABLE DEFINITIONS | * 
Wiedkteacdededededededke dededededededededededk teases sede de k vedere dese te sees sek dese Fe Bese te Fe se seg He Fe Wee te We se Fe He Fe Tere eI Ne FeNe Fe Me Fe 
ae ae 
* ALL VARIABLES HAVE BEEN PREVIOUSLY DEFINED EXCEPT FOR: * 
* BP = REAL VARIABLE THAT HOLDS THE ICP SPECIFIED PROBABILITY * 
* BREAK POINT. * 
* SERVLV = SERVICE LEVEL. THIS IS THE PROBABILITY OF NO STOCKOUTS. * 
* ZVALUE = STANDARD NORMAL RANDOM VARIABLE Z. ANORIN(SERVLEVL) % 
7% RETURNS THIS VALUE. ve 
* a 
PETS Srteriyc iors Oot oclar Seton torres tiriee tact tevartariic birtoc sei ses dein ese rtarpse arise acdsee ied set tek sei se tepce seve ioied sly tora ad vad to ested tried Selec sea Airs tie ertocd etree erate 
* de 
SUBROUTINE ROPUNC (Z,PVAR,RISK,PBP,N,ROPBAS) 
ve * 
Tededededededededetededete de deve devote cede Fede Teh ede ce tede cede te Fede de GER PRR PRTC TEENIE TREK EEE RARER 
* VARIABLE DECLARATIONS * 
Be re ae ae ce ce cae Sa ce oe eC ee Ca a a a a a ea oe ae ed a oe 
* ¥ 


REAL Z(N),PVAR(N) ,RISK(N) ,BP( 12) ,SERVLV(12) , ZVALUE( 12) , ROPBAS(N) 
INTEGER I,N,PBP(N) 
DO 10 I = 1,N 
BP(1) = FLOAT(PBP(1)) 
SERVLV(I) = 1.- RISK(I) 
IF (Z(1).GE.BP(1)) THEN 
IF (RISK(I). EQ. 0.5) THEN 
ROPBAS(I) = Z(1) 
ELSEIF (RISK(1).GT. 0.5) THEN 
ZVALUE(I) = ANORIN (SERVLV(I)) 


ROPBAS(1I) = Z(1I) - ZVALUE(I) * SORT(PVAR(I)) 
ELSE 
ZVALUE(1) = ANORIN (SERVLV(1)) 
ROPBAS(1) = Z(1) + ZVALUE(I) * SQRT(PVAR(I)) 
ENDIF 
ELSE 
CALL NEGBIN (Z(1I),PVAR(1),RISK(1),SERVLV(1),ROPBAS(I)) 
ENDIF 
10 CONTINUE 
RETURN 
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END 


* * 
FeFe Fe Fetes ds He seve ese ds Few Fe Fe VET TEN Ke He TE TH ETE TE TRI III NIK IRR CII I I II I ee II 
* NEGBIN SUBROUTINE * 
Fete re Tews Hose Te we se we Fe dete Te eve te Tee He se Te Fe segs Teak ses He Fe Me He eve se se seve dete We se ses deve reve Fes Te se Fete ees se Fe eae He resede re sevever 
* DESCRIPTION * 
Feretesese de Fe se HK Ie Ie He IGE He Fev Fe He Heese Te Te se He Bese ese seve ye Te se Te ese Fe eve Fe se Fe Ne eI Te He Te Fe Fede He sete Fee se se He se see sete se se se vex 
* * 
% SUBROUTINE TO FIND THE MIN X SUCH THAT THE CDF F(X).GE.(1-RISK). IN * 
* OTHER WORDS, X STARTS AT ZERO AND WE USE THE NEGATIVE BINOMIAL * 
%* EQUATION TO CALCULATE THE PROBABILITY OF X=0, P(X=0). WE COMPARE THE* 
* VALUE OF P(X) TO OUR DESIRED SERVICE LEVEL (1-RISK = 1-PROB(STOCKOUT)* 
%* = PROB(NO STOCKOUT)). IF P(X=0) >= SERVICE LEVEL, THEN THE * 
%* UNCONSTRAINED REORDER LEVEL IS 0. IF P(X=0) < SERVICE LEVEL, THEN WE* 
* COMPUTE P(X=1). WE SUM P(Q0) AND P(1) AND COMPARE THIS VALUE TO OUR * 
* SERVICE LEVEL. WE CONTINUE UNTIL WE GET OUR SUM OF P(X)'S >= SERVICE* 
* LEVEL. THE NEG. BINOMIAL RECURRISION FORMULA IS USED. THE FORMULA * 
* IS: * 
ci P(X=0) = (RHO)**K hs 
* P(X) = [ (X+K-1)/X] *( 1-RHO)*P(X-1) * 
* WHERE * 
x RHO = Z/PVAR * 
* K = (Z**2)/(PVAR-Z) * 
as * 
deterkesese se ese ae sez He sede Hse se He se Ne Te He ee 24 Ne ese ae te Fe Fe Te sete de ae Fes Te Te we Ne He Te Te He Te Ne He Te se ye see He Be He Ie Je Ae Fe Jeg He se Fe He Ve Me 
Ss VARIABLE DEFINITIONS * 
Fete dedede deve sede seve se seve Tove Te Fe Be Tee Tose see ve se ve Fe se se seve Fe Fe se Fee se se ve ve Fe seve Fe ve se Fe ve Fe se Fee Fe Fete He Fete He Seve Hee seve Nese Ne I 
~ ve 
* ALL VARIABLES HAVE BEEN PREVIOUSLY DEFINED EXCEPT FOR: * 
* ZZ = PROCUREMENT PROBLEM VARIABLE (FANCY NAME FOR LEAD TIME * 
* DEMAND ) * 
* PPVAR = PROCUREMENT LEAD TIME VARIANCE. * 
* RSK = RISK. SAME AS IN THE ROPUNCON SUBROUTINE. * 
%* SRVLVL = SERVICE LEVEL. SAME AS IN THE ROPUNCON SUBROUTINE. “ 
* ROPBS = UNCONSTRAINED REORDER POINT. * 
* ZVAL = SAME AS ZVALUE IN THE ROPUNCON SUBROUTINE. * 
%* SMPOFX = SUMMATION OF P(X). * 
? OK = RANDOM VARIABLE IN THE NEGATIVE BINOMIAL FORMULA. * 
* RHO = PROCUREMENT PROBLEM VARIABLE (Z OR ZZ) / PROCUREMENT LEAD * 
¥ TIME VARIANCE (PVAR OR PPVAR). 7 
* VIMRT = VARIANCE TO MEAN RATIO TEST. SPCC CALCULATES THE VARIANCE* 
+ TO MEAN RATIO (PPVAR/ZZ) AND LATER USES IT TO DO A TEST TO* 
* SEE IF THEY REALLY WANT TO USE THE NORMAL DISTRIBUTION. * 
Pak = 1 - RHO. VARIABLE USED TO SIMPLIFY THE FORMULAS. * 
* K = (2Z2**2)/(PPVAR-ZZ). ALSO PART OF THE RECURRSION FORMULA. * 
“er Or A = PCX)). . 
* B = X-1. VARIABLE USED TO SIMPLIFY FORMULAS AND CONVERT X TO * 
* A REAL NUMBER. * 
* * 
* NOTE: THIS SUBROUTINE USES A GOTO STATEMENT TO ACCOMPLISH WHAT A DO * 
* WHILE STATEMENT WOULD. FORTRAN 77 DOESN'T HAVE A DO WHILE COMMAND. * 
Fedesedede dese de dese sede de Te ce Fe Fe TO eT ICR RT TRI ITE RETIN TR TCT TIKIT ITT BIN TTT ICT TET TE ETE 
* * 


SUBROUTINE NEGBIN (ZZ,PPVAR,RSK,SRVLVL,ROPBS) 


* * 
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Tedededece deve ve deve ve ve ve ae xe Ye Fev Fe ses Fe Wee He Fe see Te Ne He Ne Fe se Te Fee Te Fe I TEN Ie Fe Fe Fe Te Fe He Fe Fe He Fe Tee eee Te Tes Te Te ee Tee Ie 


# VARIABLE DECLARATIONS * 
Sededevevedede Seve ve Tove Tove Fee Fev Fe Fede Ve Fe seve Seve ve Tere Fe We Fe Fe se Fe Fe TON Fe Fe Te Fe TONE TOC TE TE TET eH Fe NE TOLCN FONT TC TTT TTT IC 
ake % 

REAL SMPOFX,RHO,2ZZ,PPVAR,R,K,POFX,SRVLVL, ZVAL, VIMRT,RSK ,ROPBS 

INTEGER X 
* * 
HretedteNe RRM RT KR CRICKET I TCI CITRIC IKE aT KKK KI KI I CT 
* * 

SMPOFX = 0. 

x = 0 

RHO = Z22/PPVAR 

R Sil, > ielo, 

VIMRT = AMAX1 (1.01,PPVAR/ZZ) 

K = (ZZ**2)/( PPVAR-ZZ) 

POFX = RHO**K 

SMPOFX = POFX 


10 iF (K * LOG (VIMRT)OGI. 6. 9: ORS POPs aL 00001), THEN 
IP CRSK. EQ. 075)" THEN 
ROPBS = 22 
ELSEIF (RSK. GT. 0.5) THEN 


ZVAL = ANORIN (SRVLVL) 

ROPBS = 2Z - ZVAL * SQRT(PPVAR) 
ELSE 

ZVAL = ANORIN (SRVLVL) 

ROPBS = ZZ + ZVAL * SQRT(PPVAR) 
ENDIF 


ELSEIF (SMPOFX. GT. SRVLVL) THEN 
ROPBS = FLOAT (X) 


ELSE 
X =X+1 
B = FLOAT (X-1) 
POFX = (POFX * R * (B + K)) / FLOAT (X) 
SMPOFX = SMPOFX + POFX 
GOTO 10 
ENDIF 
RETURN 
END 
* * 
vetoed ickikhakcidtciciiesinihiscicekscdtcERcKeneRcckieh cients tes 
* ROPCON SUBROUTINE * 
vevevede devote de dededesetevevete dese tesesetesete te devede tere ted Fete Reese sete TCT RF TTC TCT TLR TTT RITTER RT ER Ta 
% DESCRIPTION * 
Kikai ick ceded ceteK RHR KC KR RIERA 
ae * 
* THIS SUBROUTINE COMPUTES THE CONSTRAINED PROCUREMENT REORDER POINT. * 
* (DEN BO019) SEE FD-DO1 P. 0-44 AND PS-DO1DX P. K-7 AND L-1. 7 
ve ve 
dedededededededede de etede Te sede ee TT TICK Te NTT TTC KR IAT CRATING TCT TCT TITRE 
ve * 
SUBROUTINE ROPCON (ROPBAS ,NRPR,SL,D,G,Z,DSCNTQ,LOT,MQTRSL,N,NSO, 
“ RLCONS , AAC ,ROP) 
ve * 
WUT RT eT TR TI DETTE LOPE EEE PEELED EDIE EASED DALE AEDES LETT A ERR 
* VARIABLE DEFINITIONS * 


dedevedevevedede tock todedesedetedevecetedetedovetedetevetetetonseseseveseteteciedededetesedeiesedtetedesesededesedeteseten fe tevenevecen seers 
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ee * 
* ALL VARIABLES ARE AS DEFINED BEFORE EXCEPT FOR: * 
** MSLROP = REORDER POINT BASED ON THE MAX # QUARTERS OF SAFETY STOCK. * 
**e SLROP = REORDER POINT CONSTRAINED BY THE SHELF LIFE. * 
*% MAXROP = TEMPORARY HOLDING VARIABLE FOR THE CONSTRAINED REORDER PT. * 
* R = TEMPORARY HOLDING VARIABLE FOR THE CONSTRAINED REORDER PT. * 
* R1 = TEMPORARY HOLDING VARIABLE FOR THE CONSTRAINED REORDER PT. * 
* 2 ria 
WiedededeHe Te Re ee Te Hse Tete Te sede Fea Te Ree Te ee TR Tee eet Teetesesese eae ese re KI II Kee 
* VARIABLE DECLARATIONS * 
setesbabsedededs tered deve Tededesesedese dededede sesesekevekdetededevesetese kek tesedesetesesesededededesesededeseseseseseseveseteteieteieiede 
* * 
REAL ROPBAS(N) ,MAXROP, SL(N) , SLROP,D(N) ,G(N) ,Z(N) ,R,R1,MQTRSL, 
* MSLROP 
INTEGER I,N,DSCNTQ(N) ,RLCONS(N) ,NRPR(N) , LOT(N) ,NSOCN) ,ROP(N) 
CHARACTER*1 AAC(N) 
cid te 
dervesevevesede ve Tevesedese ve Joveve Tose ve weve ve ve seve ve seve ve seve ve se sede vede Te veda ve seve veveveveveve se sevese sevens seveve sevevesevevevedeveve deve 
we * 
DO 10 I = 1,N 
IF (DSCNTQ(I).EQ.0) DSCNTQ(I) = 1 
IF (LOT(1). NE. 0. OR. AAC(I). EQ. "J') THEN 
ROP(I) = 0 
EESElhaCZGl) LE. 0. )) THEM 
ROP(I) = MAXO (NSOCI),0) 
ELSE 
MAXROP = AMAX1] (ROPBAS(1),FLOATCNRPR(I))) 
IF (SL(1). EQ. 9999. ) THEN 
SLROP = MAXROP 
ELSE 
SLROP = 4.* DCI) * SLCI) + ZCI) - (DC1I)-GC(I)) * 
* FLOAT(DSCNTQ(I)) 
ENDIF 
MSLROP = MQTRSL*D(I) + Z2(1) 
Rl = AMIN1] (SLROP ,MAXROP ,MSLROP) 
R = AMAX1 (R1,FLOAT(NSO(I)),RLCONS(1)*Z(1I),0. ) 
ROP( I) = IFIX (R + 0.999) 
ENDIF 
10 CONTINUE 
RETURN 
END 
de ae 
Tededevedede Hove tose Tete dete dese Tete Fe Feces Fede He ee TTT TT TCT CRT ITER ITNT RTT IT TCR ERI RICK 
* CONEOQ SUBROUTINE * 
sett ededstededevesesedecedesesesesesede le sede ve secs secede tee tese de dete Fee sede secede se seseke dete se secre etek eee see TK IKK 
* DESCRIPTION 7 
Setedesesevesetevesetevevesevevevevesetesesese Teves fesevese ve deve sete Teves ve veve Terese eve Hee se Fever Te Foye Tee Tee Teste Fe seve Kee 
ve oe 
* THIS SUBROUTINE COMPUTES THE CONSTRAINED PROCUREMENT ORDER QUANTITY. * 
* (DEN BO21) SEE FD-DO1] P. 0-46. * 
a * 
detedotevedetededevedesedetedotedededetedetelesesedededetededesetesede coded detetetesetesedetetesetesedecetien sete dete Ra ete tedetek 
C2 te 
SUBROUTINE CONEOQ (LOT,D,G,SL,ROP,Z,N,AAC,Q1,Q) 
de de 


Ketesedededede te sedetededetededete dete te dads Fede te Fee P PSEA SAAR SSAA IEA AAA AAA ERAT AAA RERRERR 
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we VARIABLE DEFINITIONS * 
PAA III IRR ALTAIR IRI IAAI VAR LIAISE AAI AAAI AAAI AADAC AAAI 


% 


* ALL VARIABLES ARE AS DEFINED BEFORE EXCEPT FOR: 
* QSL = ORDER QUANTITY CONSTRAINED BY SHELF LIFE. 


%# Q5 TEMPORARY HOLDING VARIABLE FOR THE CONSTRAINED ORDER QUANTITY. 
te 


deredodtevedetededevededetevededevedesedetesesesevetetede deve desetedesevckete feted te setesek ete sete hese ick KKK RRR I 
ve VARIABLE DECLARATIONS * 
tededededededededetetededetedetetete Fetes LeLeRe Fee R ELST RARER TTT RRE RRR RRR ERER 
* 


i 


+ Ft 


REAL D(N),G(N),SL(N) ,Z(N) ,QSL,Q5 
INTEGER LOT(N),N,I,ROP(N) ,Q(N),Q1(N) 
CHARACTER*1 AAC(N) 


te %e 
Tete dededededededetevedesede Tete dedesedededede Fee TERT RE TRRERTR RIKER ERE REREREEREREERERAERE 
* * 


DO 10 I = 1,N 
IF (LOT(I).NE.0) THEN 
Q(I) = LOT(TI) 
ELSEIF (D(I), LE.G(1). OR. AAC(1). EQ. "J' JOR. 201) LE. 0, ) THEN 
Q¢I) = 1 
ELSE 
QSL 
Q5 
OCT} 
ENDIF 
10 CONTINUE 
RETURN 


4.*SL(1)*(D(I)-G(I)) - AMAX1(0. ,(FLOAT(ROP(1))-Z(1))) 
AMIN1(QSL,FLOAT(Q1(1))) 
IFEX (05) 999) 


we 9 
Sedadedede Tete de deh eRe De eB PTT TSAR ICR PSAP SAR AA TEAR REBATE RETA ERERER EERE CE 
at 

RPQEOQ SUBROUTINE 


Ce aa a a a ee ee ee a ee Ca ee eg ner ae 


woN 


+ 
sag 
3 
w 
¢ 
sh 
t, 


e DESCRIPTION * 


devedevevededevevevesevevovedevevedede veveve seve vecesevevevevevevevedevevevevedede seve seve deve sede vere veve seve ve tote de seve ve seve Fev ce ve severe ce 
* Xe 
* THIS SUBROUTINE COMPUTES THE UNCONSTRAINED REPAIR QUANTITY. * 
* (NO DEN). SEE FD-DOl P. 0-16. * 
6 w 
FeveTetevedededede RIT Reve Te Te Tete Te Te eT Te Te Fe Ve Fe Te VCT CT TT FOF Te CTE TIENT FEN TeV TC TOT FETT TENET TERETE TTT TCT 
she sc 
SUBROUTINE RPQEOQ (AC,A2,D,G,H,C2,N,QREOQ) 
vw ae 


Sededetetedosedededesedetedevevedodedece se dededededstesete vededevevetesese cede te secede cede decede he edek Fete Teaene ve sece sede eee Feet Wee 
% VARIABLE DEFINITIONS * 


eater cen ce eae ee ol a ae oe ee i a a a a a ee wo le Ce aed eas ee ce 
de vw 
ote 

* ALL VARIABLES WERE PREVIOUSLY DEFINED. * 
ety a 
Sevevedevededevededevedevededevededede deve vedevesevevesede vevetevedetehetehere sek sede sede cece ede Reve dese Fede Teen CTT TORT eR ICT 


AR 
ws 


7 


BLE DECLARATIONS * 
RS ae ie cs rds cee a ape Ge ar cle ar ec a nae ae a Seveveve sotevevetedecevesesese ssc Pe eK NRIOL TRIKE AERA ARREST 


te ve 
REAL AC,QREOQ(N) ,A2(N),DCN),GCN),H,C2(N) 
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INTEGER I,N 


ve * 
sevesedet ess rede de dedede sete we ede aed te kdek ese akikkkkkicikkkkkekik kikkkKekKekKvKkkK KKK KIKI 
ake 

w ¥ 


DO—iC” de= 1,N 


vc 
Feterevede ss seve ve deve deve vee ae tee sede se ve de ae ve ve sede seve se se te ve se we Teer Te sede We RT aR ee Ie ek 
* CHECK C2 TO AVOID A ZERO DEVIDE PROBLEM. * 


Pete te IIT Ve Te Fe Fe We Te Fe We Tee Fe ToT Te TTR TC TTR IT I Te RERK TEER KKREKKRKRK KKK RE 
* 
IF (C2(1). EQ. 0.) THEN 
C2(I) = 0.01 


ELSE 
QREOQ(1) = SQRT (8. *(AC+A2(1))*AMINI(D(I),GCI)) / CH*C2(1))) 
ENDIF 
10 CONTINUE 
RETURN 
END 
or % 
Pevetedete te de de tote te te Tere re te eet NT TCT TTT T RIT ICTR TOR ETT REET RTT EER RETR RRR ER 
* BASRPQ SUBROUTINE 
Sdtetedete ete etek ete te de tetetete etch te tek tete deh Fete eR ICTR IH IRIEL RIE IRE RI CR 
* DESCRIPTION % 
ES Heese tes ei Ba org ani eine arin in ior inn spire rick fat ign se cet oiriote scar Danse fae DT Aes Se hess aac coax calc 
¢e * 
* THIS SUBROUTINE COMPUTES THE BASIC REPAIR QUANTITY (NO DEN). * 
* SEE FD-DO1 P. 0-16 AND PS-DO1DX P. L-2. * 
Sovedesese te He reve Tee Fe Ne Fe Fe Ve Fe He FOIE Te TE ECT Te FC TCT TCT FEN CSIC TCT TTC ETT TOK Te TTL TRICE KIKI 
ve * 
SUBROUTINE BASRPQ (RRCT,G,QREOQ,N,QR1) 
te we 
Fetese Hevetke seve He ak ese sede ve dese He ede te ae se ae see He He se te seve He ak se se Weve wet sete We seve ae desk Hack He eae ake ske se eae Kees tek Hex Wesker Kee 
* VARIABLE DEFINITIONS * 
Fevetese ve te seve seve se ve seve He ve Fe Fe 16 Bere ese Te Te Te Ve Te Te Te SCTE NE Be Se PETE ITE TE IE IN TE BC TE Te BE TE TE ETE Th OE TE IE IE IE NE OTE Te TEI TENS TEE ETE TS 
ay * 
* ALL VARIABLES ARE AS DEFINED BEFORE EXCEPT FOR: * 
* QR2 = TEMPORARY HOLDING VARIABLE FOR THE CONSTRAINED REPAIR QUANTITY. * 
* QR3 = TEMPORARY HOLDING VARIABLE FOR THE CONSTRAINED REPAIR QUANTITY. * 
* 4 
Fede tedevede eves deve Tose reve deve se tote Te cede Tete de Te Fede Te Fed eT CE Te TENE TTC RT RRR ERARER ERE RENIN 
* VARIABLE DECLARATIONS % 
RTT Te Tete eR IC II TT TT ENTE ITE TC Te TET TET ETE RTT NEE ANE EERERAERERERERERERER EERE 
ay * 


REAL RRCT,G(N) ,QR2,QR3,QREOQ(N) 
INTEGER I,N,QR1(N) 


a * 
Sette dedetedetetede sede Rete setete Tete te TK RIT LR IAT TR PAT REA PACK R REE RENE EEEEREEEERE 
v * 
DO 10 I =1,N 
QR2 = RRCT * G(I) 
QR3 = AMAX1 (1. ,QREOQ(I) ,QR2) 
CRIS) c= TEIXGCORS + «999) 
10 CONTINUE 
RETURN 
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END 


* * 
Sedededevedevedede sede se ses sede seve seve ve sede sede ves se vede deve te Fete seve Tete deve de seve sede tev sev sek Kesese ted sexe seve Kesesesesede esesedese 
* REPQTY SUBROUTINE * 
Seve dese dese vere se sede ve ve se se seve He se sk ve seve te ve ve wk sete vedesece se ve seve Tete det ve seve Fete ve vee We dese ese Tete Te se se dese Tete Tee ete se sete ae 
* DESCRIPTION ; * 
Teredetederere vere Fede Fede Te ve Tete He Fe Fe Fe Fe Te FETT eT TET Te TET Te eT eR eR TCR RRR CI RK RK I CT 
¥ * 


* THIS SUBROUTINE COMPUTES THE CONSTRAINED REPAIR QUANTITY (DEN BO21A).* 
* SEE FD-DO1 P. 0-57. AGAIN, WE ARE USING THE INTEGRATED DLR MODEL. * 


* * 
MATT TT I RICH I TCI IK ITE IK TIE RT RIKI TT RTT TTR HEIN RRITK T TKRRR 
* ve 


SUBROUTINE REPQTY(QR1,N,SL,D,G,ROPBAS,Z,LOT,DRTAT,NIMSC, AUTHLV,QR) 
Ve * 


evedederededeveseve se seveve se sede se tose sevete seve seve seve se seve severe vee se dese Teste rete se tes ses Tose sete seen sone teste sek sex vest seve sen 


* VARIABLE DEFINITIONS * 
Tevedevevede devevede seve ver ve ves ve ve te sede se seveve ve severe seve seve Ne seve te seve ve we sek ote sete sete sete He ve Fe ve sede Fe seve seve se Fe Tee He se Fe vee 


* * 
* ALL VARIABLES ARE AS DEFINED BEFORE EXCEPT FOR: * 
* QSL = REPAIR QUANTITY CONSTRAINED BY SHELF LIFE. = 
* QLOT = REPAIR QUANTITY IF THERE IS A LIFE OF TYPE QUANTITY. oo 
%* Q2MIN = TEMPORARY VARIABLE TO HOLD THE CONSTRAINED REPAIR QUANTITY. * 
x02 = TEMPORARY VARIABLE TO HOLD THE CONSTRAINED REPAIR QUANTITY. * 

* 


Tse de ded Kets Tevet Hesk Te sete Te TeNke Ve Fe eve Fe FW Tete te He HF Ve Tete Fe see He He He ve Fe Fe HHH eK NK He sete te KI IK KK KI HK 
* VARIABLE DECLARATIONS s 
dedededededetedeve fete te de dede Leta te sete be tee Bede be dete Pete Fe Lede eee LoS Se FECT PERLE LCST ELE SETTER LTRS 

REAL SL(N) ,QSL,D(N) ,G(N) ,Z(N) ,QLOT,DRTAT(N) ,Q2MIN,Q2, 

¥ ROPBAS(N) 

INTEGER I,N,LOT(N) ,QR1(N),QR(N) 

CHARACTER*2 AUTHLV(N) 

CHARACTER*1 NIMSC (N) 


ce ve 

Tededeve Tete ve deve Te de Fede Te Te Nee Me Tete Fe He Te VET Te TET NT RIC ITCRI CT ERE RERREREKRERREREREE EERE RRR 

ow we 
DO 10 I = 1,N 

de a 


Teredeve de deve dese ve ds Yess deve ce deve deve ve ve weve ve seve ve vesese desde teve Jose seve seve sek sek seve seve He seve sede Weve Fete seve seve Te se deve ve Tere ese 


* THIS IS A CHECK TO SEE IF SPCC IS THE SECONDARY INVENTORY CONTROL a 
* ACTIVITY (SICA). SEE P. 3-44 AND 0-57 OF THE FMSO FD-DO1 MANUAL. % 


* ALSO SEE FS-DO1DX P. K-11, PARA. 38-A. * 
Kesevedesede Fede se sevete vets Tesevese deve ve sete se sek doves deveve de vevede se seve k secede sede se se sete He se seve ye Ke seve se sede Fe Fee Fete Tevet He Fe ses 


ve ci 
IF (NIMSC(1). EQ. '5'. OR. NIMSC(1). EQ. '6°. AND. AUTHLV(1). EQ. '8D') 
* THEN 
QR(I) = 0 
v * 
Teedeve sede Te ve ve sede Fede sets Hove de Fe Fede Teves dete seve He Kese Ve ewes He Fe Teves He Tete ese ve ve Neve Te Te Te Be Fe Fe Me Fe He Ve ve Fe Fe Wee He eT He He ee 


* SEE P. K-11, PARA. 38-B OF THE FMSO FS-DO1DX MANUAL FOR THE NEXT 2 * 


* LINES. * 
Sse an cats eieercts Cetra) Coa Grecs Ciaran Ca cinG) acento Gia Gidea kaera Gio hie wid es See in Cas sei cas Ske aa tas Gieaa as is aio bie cic Ghee Gece ae ies ie ia oa nia ieee aay ee cs eee peed 
te * 
ELSEIF (DCI). EQ. 0. 0. OR. G(1). EQ. 0. 0. OR. DRTAT( 1). EQ. 0. ) THEN 
QR(I) = 1 
ELSE 
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QSL = 4.*D(1)*SL(1)-AMAX1(0. 0,(ROPBAS(I)-Z(1))) 
IF (LOT(I).NE.0) THEN 
@LOT = FLOAT@IOTE®) - DRTAT(I) * 


* AMAX1(0. , (ROPBAS(1)-Z(1))) 
Q2MIN = AMIN1 (FLOAT(QR1(1I)),QSL,QLOT) 
ELSE 
Q2MIN = AMIN] (FLOAT(QR1(1)),QSL) 
ENDIF 
Q2 = AMAX1 (1. ,Q2MIN) 
QR(I) = IFIX (Q2 + .999) 
ENDIF 
10 CONTINUE 
RETURN 
END 
* * 
PTI TT TTT TCT RTT ICT RIT IRA NNT TT FTIR IT IIIT TI IT RIT IIA IKKI ARK EE 
* BRPROP SUBROUTINE * 
Fededededede ede de Tete de We dete Fe Tee Te Tee Te Teds Te dee Fs Bede Pete Fe FDA RRR MERRIER IKE 
os DESCRIPTION * 
Reset Tee Hees Hee Fe He Fe Te TH KIT LTR ICI TE CI Te NTE ENTE TRICK ERIE IC TRIER KRENEK I 
ce * 
* THIS SUBROUTINE COMPUTES THE BASIC REPAIR REORDER POINT OR LEVEL. * 
* SEE FD-DO1 P. O-53. AGAIN, WE ARE USING THE INTEGRATED DLR MODEL. * 
* (NO DEN) * 
us * 
Sededeve vedere de vedere eve seve sevens Te eve vee seve se seve seve Fe sews Te seve He Te te seve de seve se Tee Fee Fee seve se ese see se Keene ete Fete sek seed 
sie oe 
SUBROUTINE BRPROP (QR,N,Z,DRTAT,ROP,R2BAS) 
* * 
OR ralan ona ee ne nar ihren emrsiaetacisrtirt orise! seuicisr or artery or bib icc acted oc trig pease Serscisicl seis bined oie pieiec seueiprok rier schiriict ar oriset artes 
* VARIABLE DEFINITIONS % 
ea ee a ee ne ale a ce oi in ae ce nae oor Ce Cg ren ores Ce ean ee Catia ne eu Cote aa rate Circe sie ees POT ee 
% bid 
* ALL VARIABLES ARE AS DEFINED BEFORE EXCEPT FOR: * 
* RROP = ROP CONVERTED TO A REAL NUMBER FOR CALCULATIONS. * 
* RQR = QR CONVERTED TO A REAL NUMBER FOR CALCULATIONS. ve 
cid cig 
Se SEO RG Sa Ao oo OS REC ERE OS Sena rian reistln de inmirhinge rindoninarnirsicnin chien cer act ietir elie ti Gettin aie tetra pictiry et inant sera leds 
* VARIABLE DECLARATIONS % 
Bic aa Stereo ce conoicsic Cann ca co cc Daciano sco oct TO CSS DSL COCO COCs COCO LOSE IC ae OSS OR SKIT or Aer rE SC ACL 
ve oy 
REAL Z(N) ,DRTAT(N) ,R2BAS(N) ,RROP,RQR 
INTEGER 1,N,ROP(N) ,QR(N) 
se oe 
DEPART IRR RR RE RETIREE ERT RERRERERERERREEEERERERERRERERTRER TERETE 
* ry 
DO 10 I = 1,N 
RROP = FLOAT (ROP(1)) 
RQR = FLOAT (QR(I)) 
R2BAS(1) = DRTAT(I) + AMAX1 ((RROP-Z(1)),0.0) 
10 CONTINUE 
RETURN 
END 
Se ae 
Sevevede deed tee Tedeve Tere ve ve Fede re VeFe POTN Oe TOTS OTE TONE TEN Te Tee Te TOT He Tose Ke Teves Fete Te sede fe seve Feve Fete se ePIC Te Te eK Fee 
* REPROP SUBROUTINE 
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RIN ARNE RRR TIE EER REE EERE ERR RE REE REE REREERERERAAITE RRR 


* DESCRIPTION * 
PIKE KTAIK RKTT IRE REERIEKRERERRERERERERREREREREEERRERER RRR KIRKE 


* * 
* THIS SUBROUTINE COMPUTES THE CONSTRAINED REPAIR REORDER POINT OR * 
* LEVEL (DEN BO19B). SEE FD-DO1 P. 0-54. AGAIN, WE ARE USING THE % 
* INTEGRATED DLR MODEL. * 
* ey 
Sedede dese Teves Tevede te Terese Te deve dete deve te te sete Te Fe se Fe Fe Fe Fe ICT Te TTT TTR FON FETT TE TN FCF R TOIT TE TTC FETE TC ICTR FCT TE CTE 
* . * 

SUBROUTINE REPROP (N,NRPR,D,SL,DRTAT,LOT,R2BAS,NSO,G,NIMSC ,AUTHLV, 

* R2) 

* * 
Kriereredede deve ke dese terede te Teds tete ke TeVeve Te TT CTT TC TCT TC TCR TR TCR TNT TN TCR TEIN ICT TTR TCT RT TTT 
* VARIABLE DEFINITIONS * 
KATRIKRERERRERERIERERIEREEREREERERRERERERERREKREREREREREEREREREREEREREREERE 
* * 
%* ALL VARIABLES ARE AS DEFINED BEFORE EXCEPT FOR: * 
% R2MAX = INITIAL CONSTRAINED REPAIR LEVEL. * 
* R2SL = REPAIR LEVEL CONSTRAINED BY SHELF LIFE. * 
* R2MIN = TEMPORARY VARIABLE TO HOLD THE CONSTRAINED REPAIR LEVEL. * 
* RR2 = R2 CHANGED TO A REAL NUMBER FOR COMPUTATIONS. * 
chy * 
Sedederkededede tedevedede ve sete de ve teve dete ved ke secede Fe deve de te Te seve ve Fe ve Fe dese We Tew Te Fete FeN ese Tee ete He ese Tee Tee ete Ke ese eH WI He 
* VARTABLE DECLARATIONS * 


Sedvdedededededededededededede deve deve deve sede Fe eee TeV RTS TCE RITE TCR TERRI IK BR ERECT RRRERERRIR RY 
* 


REAL DRTAT(N) ,D(N),SL(N) ,R2BAS(N) ,G(N) ,RR2 ,R2MAX,R2SL,R2MIN 
INTEGER I,N,LOT(N) ,NRPR(N) ,NSO(N) ,R2(N) 

CHARACTER*2 AUTHLV(N) 

CHARACTER*1 NIMSC (N) 


* * 

Tavtetededek devededede sek ted sedede Tey sede Tete Tete te etc Fe Fee ARRIETA IKI KEK KKK KE KR 

eis de 
DO 10 J =1,N 

oy Ww 


Tededete dete Tedede de dete Weve te He Fe Tee Fe Te TCR TER CRT RIKER RE RRA KREERERREEE ERE ERR 
* THIS IS A CHECK TO SEE IF SPCC IS THE SECONDARY INVENTORY CONTROL ¥ 


%* ACTIVITY (SICA). SEE P. 3-44 AND 0-54 OF THE FMSO FD-DO1 MANUAL. * 
* ALSO SEE FS-DO1DX P. K-11, PARA. 38-A. * 
Jedvdederedetede deve dedede deve deveve ve de ve deve ve seve te ve de Fe delete He Tete Te Te Te se Te Pe Tee Te TC TERI ORE Te EIR ICTR TT eK He Tee seve 
ve * 
IF (NIMSC(I). EQ. '5'. OR. NIMSC(I). EQ. '6'. AND. AUTHLV(I). EQ. '8D') - 
* THEN 
R2(1) = 0 
* ¥ 


Tesedede toda de Fede seas Fede de Hede He Fe dete ede see sete te eR Tee FCT TTT RT RICE TERI RATE TT TERR IRR TRI RC TE 


% SEE P. K-il, PARA. 38°-B OF THE FMSO FS-DO1DX MANUAL FOR THE NEXT 2 * 
* LINES. * 
PRT Tete tee TET TEETER ET ETE TOT  LOE ETE T ERE TREE REE ETE ES EREREREEEEREEERER EE 
ve ¥ 
ELSEIF (O(1).EQ.0, 0, 0k. GUI). EO.0) nen 
R2¢1) = IFTX (AMAXT (CDRTAICI) 391055) 02 )) 


ELSE 
R2MAX = AMAX1 (R2BAS(I),FLOAT(NRPR(I))) 
R2SL = 4. * D(1) * SL(D) + DRI4IG1)) — 1 
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Te CLOT(CT)-NEOO) THEN 


R2MIN = AMIN1 (R2MAX,R2SL,FLOAT(LOT(1))) 


ELSE 
R2MIN = AMIN1 (R2MAX,R2SL) 
ENDIF 
RR2 = AMAX1 (R2MIN,O. ) 
R2(1) = IFIX (RR2 + .999) 
ENDIF 
10 CONTINUE 
RETURN 
END 
C 
/* 


//GO.FT10F001 DD * 

7H4D 000042754 0 .500 0005 00004637. 00 
03.92674000 00249. 31392000 03. 92674000 
00000000. 00000000 00000001 00000000 V 
00000008. 00 22 C 

7H34 001779946 0 .500 0002 00005473. 00 
03. 64693440 00327. 68970000 03. 79413000 
00000000. 00000000 00000001 00000000 V 
00000015. 80 22 C 

7H3A 001823756 0 .500 0003 00000445. 00 
03.57152000 00356. 06592000 03.57152000 
00000000. 00000000 00000001 00000000 V 
00000013. 70 22 C 

7H3F 001876676 O .500 0000 00000683. 38 
00.02939400 00000. 43832000 00. 03195000 
00000000. 00000000 00000001 00000000 V 
00000000. 10 22 C 

7H3C 004940145 0 .500 0000 00022685. 79 
00. 10063690 00004. 35817000 00. 11059000 
00000000. 00000000 00000000 00000000 V 
00000000.00 22 C 

7H4D 008898110 0 .500 0003 00000992. 00 
03.43664000 00169.91716000 03. 65600000 
00000000. 00000000 00000001 00000000 V 
00000002.50 22 C 

7H4A 010291741 0 .500 0005 00005425. 00 
01.93279950 00189. 60701000 04. 27768000 
00000000. 00000000 00000001 00000000 V 
00000001. 70 22 V 

7H4B 010292581 0 .500 0003 00000579. 21 
02.01455040 00081. 68222000 02. 00876000 
00000000. 00000000 00000001 00000000 V 
00000001. 20 22 C 

7H3F 010329059 0 .500 0000 00002256. 00 
00. 0216456 000000. 32954000 00. 02488000 
00000000. 00000000 00000001 00000000 V 
00000000.00 22 C 

7H3E 010373691 0 .500 0002 00014434. 52 
02. 39400000 01020. 13599000 02. 52000000 
00000000. 00000000 00000001 00000000 V 
00000010.00 22 C 

7H3A 011126484 0 .500 0000 00498852. 96 
30. 59998000 01414. 23926000 30.59998000 
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03.92674000 03.92674000 
00000000. 00000007. 30 00000462. 
043. 78323000 00000043. 70 


00 


03. 79889000 03. 79889000 
00000000. 00000015. 70 00000295. 
040. 04028000 00000038. 40 


00 


03.57152000 03. 57152000 
00000000. 00000013.00 00000501. 
038.57242000 00000038. 50 


07 


00. 03195000 00. 03195000 
00000000. OQ0000000. 10 00000500. 
000. 28947000 00000000. 20 


00 


00. 11059000 00. 11059000 
00000000. 00000000. 00 00008400. 
000. 82280000 00000000. 70 


00 


03.65600000 03. 65600000 
00000000. 00000002.00 00000441. 
034. 22017000 00000032. 10 


00 


04. 29511000 04. 29511000 
00000000. 00000002.90 00002957. 
047. 24622000 00000021. 20 


60 


02.09849000 02. 09849000 
00000000. 00000000. 80 000000445. 0 
019.64189000 00000018. 80 


00.02488000 00. 02488000 
00000000. 00000000.00 00001161. 00 
000. 19907000 00000000. 10 


02.52000000 02. 52000000 
00000000. 00000010.00 00002500. 00 
045. 36002000 00000043. 00 


30. 59998000 30.59998000 
00000000. 00000037. 90 00045524. 50 


00000000. 00000000 00000001 00000008 V 373.93188000 00000373. 90 
00000043. 70 22 C 

7G3B 011137212 0 .500 0000 00000638. 00 01.25000000 01. 25000000 
01.08750000 00017. 14398000 01.00000000 00000000. 00000001. 30 00000238. 00 
00000000. 00000000 00000000 00000000 V 009. 81251000 00000008. 50 
00000001.30 22 C 

/* 

ii 
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APPENDIX B. HIGH REPAIR SURVIVAL RATE (RSR) COUNTER 
PROGRAM 


//DEXA9864 JOB (9864,9999),'M. DEXTER SMC 2334' ,CLASS=B 

// EXEC FORTVCLG, IMSL=IMSL10 

//FORT. SYSIN DD * 

WATT Te TET Te Ve VET Te Te eI HE Te oN TET TENE ETE TE ETE TCT TEE RENE TEER RICKI TEN KICTE TOR FTI IN KIRK IRRERRET 


oF JES : HIGH REPAIR SURVIVAL RATE (RSR) COUNTER. * 
* DATE : 30 JUNE 1989 * 
* AUTHOR : MARK D. DEXTER * 
Eo voleven:) s LEMe3s03S * 
* COMPILER: FORTRAN LEVEL 77 VERSION 4.1 as 
ee * 
ewe MeIesese sese Ve Teste HW Ves He WBA Te EH Te I Me Ie Te He Meee Te Be He Te Teak Teese Jes He seve He Jes He He Me Tee Te Te se see Teme He ve He He Mee He Me Me IE eI 
* PROGRAM DESCRIPTION * 
Fedededetetede rete se de Fe sete Tee eK Fe Ne Fe He He Te ese He Ne se Te ye Nee Be Ie ae Te eT Me eM Ie FE He IE EF TE NE IE IE TE TE TENE Te IE Fe TE Te IE IE IE TEE TE ITE 
os oe 


* THIS PROGRAM IS USED TO COUNT THE NUMBER OF 7H COGS ON A CARES DATA * 
%* HAVING A REPAIR SURVIVAL RATE (RSR) GREATER THAN OR EQUAL TO A VALUE * 
* SPECIFIED BY THE USER. LINES 7 AND 8 ARE SET UP AS COMMENTS, BUT BY * 
* ERASING THE 'C' IN COLUMN 1, YOU CAN HAVE THIS PROGRAM PRINT OUT ALL * 


* OF THE RECORDS THAT WERE COUNTED. * 
* * 
* THE VARIABLE I IS WHERE YOU SPECIFY THE RSR PERCENTAGE. % 
ve * 
SEE ARSE SOR I EE a eel lela tne ley esha rele lea pk eae tested peer ace Se fd Oe ed ae ATCA eRe Lil Sekt Seon Rao aa 
¥ VARIABLE DEFINITIONS * 
SAR Ra REA Seance ICE Rina Pe Bio IEC ren no Acorn cee icier oe OOS en SSC Orcs DRILL Selo I IES ELS CISTI CICLO CLASES CISC AICS ESEAD 
v * 
* CRR = CARCASS RETURN RATE. SINCE THE CARES DATA SET DOESN'T HAVE * 
* THIS VARIABLE, IT IS ESTIMATED BY: * 
* CRR = REGEN / (D * RSR) * 
be ¥ 
* THIS FORMULA IS COURTESY OF PROFESSOR ALAN W. MCMASTERS OF * 
* THE NAVAL POSTGRADUATE SCHOOL. * 

QUARTERLY DEMAND FORECAST. COMES FROM THE CARES DATA BASE. ¥ 


+ 
Oo 
Nott 


% HIRSR COUNTER TO RECORD THE NUMBER OF RECORDS HAVING A RSR HIGHER * 
* THAN THE USER SPECIFIED RSR. % 
ae = THE USER SPECIFIED RSR. THAT IS, IF YOU WANT TO FIND ALL THE * 
* RECORDS WITH AN RSR >=.90, CHANGE THE FIFTH EXECUTABLE STATE- * 
7 MENT BELOW TO: * 
* I = .90 * 
* ve 
% MARK = MARK CODE FROM THE CARES DATA SET. * 
* NIIN = NATIONAL ITEM IDENTIFICATION CODE. THIS IS THE STOCK NUMBER * 
* FROM THE CARES DATA SET. * 
* REGEN = QUARTERLY REGENERATIONS FORECAST. THIS COMES FROM THE CARES * 
* DATA SET. * 
* RSR = REPAIR SURVIVAL RATE. THIS COMES FROM THE CARES DATA SET. * 
* TAT = REPAIR TURNAROUND TIME. THIS COMES FROM THE CARES DATA SET * 
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weicdkkeckickdedckddededcick tedesendetetcdese sede tested Ketede Fede Fe TeK KAI HK KR RI ek ict ei 
* VARIABLE DECLARATIONS * 
detrtekdedlek kickkvkacskaakakscsek se escsenkedevesesek desks kick sedcsetede teases seve te sede dese deve dese Tease de ves sevedesese se 
* * 


REAL RSR,TAT,D,REGEN,1,CRR 
CHARACTER MARK(1),NIIN(9) 


INTEGER HIRSR 
* * 


dedodedededededede sede dex Tevewe Fede ve seve ede de de Fee He FECT HFEF ED FETT LETTE TEFEN Te TEV TEFE TE TEFEN FELDER RICK TRIER IKI 
INITIALIZE VARIABLES * 
dededodedededede de dee deve sede seve Fede Fede se te ede terete te Tete te TeTe Ve se He Pe VeNe Te TTC TCT TR ICN IITC RTCA T TTR ICI 
J * 
HIRSR = 0 
oe a oo 
ve * 
tetededededededesedede sek se sede IT RRR KT TRI CHR CT CITI TKK KI CTT CR IC I CK I 
* READ IN THE CARES DATA * 
dedovedededkdededededededede steve kee dete sede ve dese se sese te deste se eves sete se seve ve aesese sek Fe sete Tete te Fe Fete ve sete Kese sete Fete He seve Fess Fees Ie 
* * 


1 READ(10,5,END=99) MARK,NIIN,RSR,TAT,D,REGEN 


5 FORMAT(4X,A1,9A1,20X,F3.2,F4.2,24X,F10.2,F10. 2) 
* % 


Sedvdedvavdevevedededeseded devede dese de Fede de He de Te dese te vesevs de He ve seven ve ke We vee ve deve He ve de eden ede Feed HK He eT eM eK I He 
* ESTIMATE THE CRR * 
Detetedetedede Vee de Tee ke MRT TRAIT IR CTS TCT TE TPE DE TCT NCTC TC TC FETC FETT CNC TEST TCT PTCA IETHER 
* * 
IF (RSR.NE. 0.) THEN 
CRR = REGEN/(D * RSR) 


ELSE 
CRR = 0. 
ENDIF 
oe * 


Sedevededevedeve sede seve ve seve sede ve deve se seve sede se deve se sete se sevede sede sesede seve vee deseve sesesc seve se eve de sek seve seve se te dese se sete seve deve 


* TEST EACH ITEM TO SEE IF THE RSR FROM THE CARES DATA BASE IS GREATER * 
* THAN OR EQUAL TO THE USER SPECIFIED VALUE I. * 
ata cog ange oo ia oor) Sie Sie cia wu Gia Sis sia aut Ss sia bua eve suesia Gia Gre saz Sitwne sid obese cre Gia wid <1 mare it nie ia bie ie Gideie sha Sass iat Sie 1 Sia sid SUE SIT GIE ia Ci Sie bia oat So Sis ese sae sie ote Ge 
* by 
IF (RSR.GE.1) THEN 
* * 
Ro orchid tok rnin ror eo O Oro rr Or Ar pr IC iar Ir Or ILO Ok bie SCC Or Ia ST SUSI cor bik (sca sci east ic cd or rich a reo art 
* YOU CAN PRINT OUT EACH OF THE CARES RECORDS HAVING RSR >=I, BY BLANK- * 
* ING OUT THE 'C' IN THE FIRST COLUMN OF THE FOLLOWING WRITE AND FORMAT * 


* STATEMENTS. * 
TRE nicee sine deer ts rior Poa ess OEE HOO SEE BREE eT oT Ie TEE SESE ABDI GE Is EI tS oT AEE SE aS ES EE EE 
* * 
C 7 WRITE (6,8) MARK,NIIN,RSR,TAT,D,REGEN,CRR 

C 8 FORMAT (4X,A1,5%,9A1,3X,F5. 2.5%.F4. 2.3% Fl0)2eon eG oe) Onn 
iG 9 WRITE 10 

C 10 FORMAT (3X, 'MARK' ,6X,'NIIN',6X,'RSR',4X,'RTAT',5X,'DEMAND' ,4X, 

c + "REGENERATIONS' ,5X, 'CRR") 

oe * 
Boa tise ge niaen Gece ea as Goer tes a Gee ee re os ee Og a es cee oe Or cae on ane oe ee ae oe Cc eee ce a aCe 
* INCREMENT THE COUNTER WHEN WE FIND A NSN HAVING RSR >= I. * 
PLETE ee eNO ee eee Te Bees OTN PE TETE TE ERE VOTED TEE ERE EPEC OTE TEED PETE TOEE EEE TOE OTC TE ELELE LETTE LTR ARTE 
* ae 


HIRSR = HIRSR + 1 
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ENDIF 


GO TO 1 
* * 
etere te vesiete dere ae sete Tee eH HAIN IR TIT TE IK WI TENT TE TET TEE HITE TTT TE IEE ICN TOIT NE ETEK ITE IEE, 
%* PRINT THE NUMBER OF RECORDS HAVING RSR >= I. es 


setetete dete ve de se sess Fete te sede Tose Fe Tove Fev eve Tose Te Tee ETE TEE EINE TEE NE ICI TE TEI ERIE TEN TENE HK FEN OTE IIE 
ee Os 
99 WRITE (6,100) HIRSR 


100 FORMAT (5X,'NUMBER OF RECORDS WITH RSR >= .98 IS:',15) 
STOP 
END 
/* 
//GO.FT10F001 DD DISP=SHR,DSN=MSS. F0935. REP7H 
[* 


// 
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APPENDIX C. SAMPLE RSR, RTAT, AND D, COUNTER PROGRAM 


//DEXA9864 JOB (9864,9999),'M. DEXTER SMC 2334',CLASS=B 
// EXEC FORTVCLG, IMSL=IMSL10 


//PORT. 3YS IN DDE 
etereTe RMT TRIN IIIT IT IK IIIT RR TIT IIR IRI IKARIA IIR ARI IERIE 


* TITLE ; HIGH RSR, HIGH RSR, AND LOW DEMAND COUNTER PROGRAM ¥ 
* DATE : 30 JUNE 1989 * 
* AUTHOR : MARK D. DEXTER % 
oN 8 Iai Sse! * 
%* COMPILER: FORTRAN LEVEL 77 VERSION 4.1 * 
de ve 
vevevedededotedelodetesedete cece tecedete lode cede dete dete he Rese se Fede ede Behe RL TTR CRS TLL STIS REPRE RRERRE 
ve PROGRAM DESCRIPTION z 
devedeteteolokieddededieeeh echnical «AR: 
we ve 
%* THIS PROGRAM IS USED TO COUNT THE NUMBER OF 7H COGS ON A CARES DATA * 
* HAVING A REPAIR SURVIVAL RATE (RSR) GREATER THAN OR EQUAL TO THAT % 
* SPECIFIED BY THE USER, A LONG REPAIR TURNAROUND (TAT) TIME (TAT > 4 * 
* QUARTERS, AND A LOW DEMAND (D < 0.25 PER QUARTER) * 
areca is sein jaa bi aera cia Vietresie a aia Gia Ga iaaia aaa ois Gen acnoc aaa iasia cacao srasea via ie Cia sie iataa Si seats cis Caatetie Gece caacakis any Cec siemens iets rasa ieee te eaten netsel 
* VARIABLE DEFINITIONS % 
Sevevodetetededetevetedeteve secs tedode tevede ve ce ve se cewe ese ce te cece Fede secs eae eee de CIC SCTE TCE TS TORE TO TOT TOTO TE TCC TE ICR OTe Sete tee ee 


whe 
ws 


* CRR = CARCASS RETURN RATE. SINCE THE CARES DATA SET DOESN'T HAVE * 


* THIS VARIABLE, IT IS ESTIMATED BY: * 
ve ve 
* CRR = REGEN / (D * RSR) * 
* ote 
* THIS FORMULA IS COURTESY OF PROFESSOR ALAN W. MCMASTERS OF * 
By THE NAVAL POSTGRADUATE SCHOOL. % 
*« D QUARTERLY DEMAND FORECAST. COMES FROM THE CARES DATA BASE. * 


* HIRSR COUNTER TO RECORD THE NUMBER OF RECORDS HAVING A HIGH RSR, * 
* LONG TAT, AND LOW DEMAND. % 
a I = THE USER SPECIFIED RSR. THAT IS, IF YOU WANT TO FIND ALL THE * 
“ RECORDS WITH AN RSR >=.90, CHANGE THE FIFTH EXECUTABLE STATE- * 
* MENT BELOW TO: * 
ae ts , 2 de 
we te 
* MARK = MARK CODE FROM THE CARES DATA SET. * 
* NIIN = NATIONAL ITEM IDENTIFICATION CODE. THIS IS THE STOCK NUMBER * 
* FROM THE CARES DATA SET. * 
* REGEN = QUARTERLY REGENERATIONS FORECAST. THIS COMES FROM THE CARES * 
* DATA SET. * 
* RSR = REPAIR SURVIVAL RATE. THIS COMES FROM THE CARES DATA SET. 
* TAT = REPAIR TURNAROUND TIME. THIS COMES FROM THE CARES DATA SET * 
* ve 
Sevevededevededededevedededede FeRe FeceRe VeRO TTR TR TER TT TCT ICTR TCT ET TCR SEDER ERR ARR RICK SRI R ICT 
* VARIABLE DECLARATIONS * 


he he PN A to awlo ata: he he waowtanta: le a ontoutontonton!onlonta: Jao wte wa te lowe who! Jo wlows ato to adn. he wa fo wen lo whe. 
tekdedcletedetetededvetetet tetetedetetetete sete fesetele Rte Tel PePoT CRIA RIA REE REET RATREETARRRRKR 
* %* 


REAL RSR,TAT,D,REGEN,1,CRR 
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CHARACTER MARK(1),NIIN(9) 
INTEGER HITAT 


bis w 
Feacwesesee sess ese eset se se sese se tere He ete te Fe seve se ak seve dese te seve ve deve ve seve ve dese ve se ve Fe seve se ve He se se ses re se se se ve Wek Tete se eee see 
* INITIALIZE VARIABLES * 
Fesede dere te devesk dese te Tete eye sete gee reset Te Tose Te Ne ese Hee Te Te TeFe Fe TENET TIE FETE Fe Te Te Tee TET Te Ie Te Fee TE Te Te eI IE TE Tee IN eT 
oy * 
rat — 0 
= 509 
cis * 
PAT re Fe ses Te ee Te NITRA REE RIERA EERE RERETEERREKREREERIEREREERERERKKKIEK 
* READ IN THE CARES DATA * 
TETRIS REET IC AREA TEER REN TRICE EREREKR REET RRR ERREREERER EERE 
ry * 


1 READ(10,5,END=99) MARK,NIIN,RSR,TAT,D,REGEN 

> FORMAT(4X,A1,9A1,20X,F3.2,F4.2,24X,F10. 2,F10. 2) 
¥ ¥ 
detetededededededesededededeteded tered dedede dederedk dere dea ded seve deve dete dete deve reve ede ae aedese dover dete dedesevede dered ae dese seve ere 
* TEST EACH ITEM TO SEE IF THE RSR FROM THE CARES DATA BASE IS GREATER * 
* THAN or equal to THE USER SPECIFIED VALUE I, IF THE TAT IS GREATER * 


* THAN 4 quarters, AND IF THE DEMAND IS LESS THAN 4 per quarter. * 
SSeS SEAT ait in IAN Sr reir state] Seaseageastchte site arise taciraoe ieee harass iol tach eee ini toctear keke emcees nec wat oe kek er ise bee aseipe aay aes seapeiteapen 
* chy 
IF (TAT. GT. 4. AND. RSK. GE. I. AND. D. LT. 0.25) THEN 
* * 
Sededeveds te deve ve Fess Te se te Fe Ve Fe Be Tee IE Te TOE Te NE TS Be TEE IONE TS TOKE TE TE ETE ETE TS FETE FETE TE TE TOD TE FEET ODEN FON TEM IEW IC TEI TE IETS ITE TE 
vt ESTIMATE THE CRR * 
POTTED Te Tote Te OTe TCT ES TS TS ENTS ENTS TS TS ESTE ICUS ACES TSTT TC TCTS NTE ECTS TEE TS ECE ERR ETT EEE TRERERERERERRTEREREET 
* te 


IF GESRONE. 0.0. AND. D.NE. 0.0) THEN 
CRR = REGEN/(RSR * D) 


ELSE 
CRR = 0. 
ENDIF 
* * 
Soars titles os Gods leaden aul terhna coburn beoecois birsiobr netic ae tion barra keri beauarise ih oeimrit ble ieardaa satu Orion bic seige oii 


* YOU CAN PRINT OUT EACH OF THE CARES RECORDS HAVING RSR >= I, TAT > 4, * 
* AND D < 0.25 BY BLANKING OUT THE 'C' IN THE FIRST COLUMN OF THE FOLL- * 
%* OWING WRITE AND FORMAT STATEMENTS. S 


a tate ieee ete he wae a ec hoe cis Seay ope los ew ox Go wdesicsic sun ciewis civ wie vente Sietramiaci: aekietnes ericson cia ie ie a wie zc sia Cina Ga ienie Siena Ge ies 


as aX 
C 7 WRITE 8 

C 8 FORMAT (3X,'MARK' ,6X,'NIIN',6X,'RSR',4X,'RTAT' ,5X, 'DEMAND' ,4X, 

C WRITE (6,9) MARK,NIIN,RSR,TAT,D,REGEN,CRR 

C 9 HOR VAME GSMA onal onnrom2coAehon 2 oN nF lO. 2, 34, 10.2,3X,F10. 2) 
C + "REGENERATIONS' ,5X,'CRR') 

* * 


dedetedevedetedete deve tose te dese tee he eRe ete te he sete a eBe RTT ERTL LTR REITER RRR CER 


* INCREMENT THE COUNTER WHEN WE FIND A NSN HAVING RSR >= I, TAT > 4, * 


* AND D < 0.25 ve 
Fete Pee Tee RTT CT TTI RTT ITT RIN TTT TCR TIT TIT IKKE RREERERE EERIE RRE REET 
+ we 
HiekAde— Hira + il 
ENDIF 
GO TO 1 
% & 


1, 


tekakekinckikbseskakkekkacdeskeseseksk skied skaksesksese kk vskok teak desk ks se skeak tek tek ake teak desks tease se sete akeskseveskeser sesk ewes 


* PRINT THE NUMBER OF RECORDS HAVING RSR >=I, TAT > 4, AND D < 0.25 * 
devvdkesecedecesesececksess seskvesesesk sess eae He sete seve seve se ae se Te ve sete sek Fete te Fe ese Tee eM Te Fee Fe Te Te Ne Tete Te se Tete Te seve seve ye Fe Fe se 
* te 


99 WRITE (6, 100) (HET AT 
100 FORMAT (5X, 'NUMBER OF RECORDS WITH RSR >= .99, RTAT > 4, AND D < .2 
+5 [37a lo) c 


STOP 
END 
/* 
//GO.FT10F001 DD DISP=SHR,DSN=MSS. F0935. REP7H 
/* 
// 
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